From ad4c02a9d7794727c78d36bd47b7272af3efc523 Mon Sep 17 00:00:00 2001
From: Sergey Abramyan <sa.abramyan@gmail.com>
Date: Sat, 12 Apr 2014 11:44:19 +0400
Subject: Add default value for maps:get

---
 lib/stdlib/src/maps.erl | 18 +++++++++++++++++-
 1 file changed, 17 insertions(+), 1 deletion(-)

(limited to 'lib/stdlib/src/maps.erl')

diff --git a/lib/stdlib/src/maps.erl b/lib/stdlib/src/maps.erl
index fd6d56fa47..4ef1638e6d 100644
--- a/lib/stdlib/src/maps.erl
+++ b/lib/stdlib/src/maps.erl
@@ -23,7 +23,8 @@
 	fold/3,
 	map/2,
 	size/1,
-	without/2
+    without/2,
+    get/3
     ]).
 
 
@@ -142,6 +143,21 @@ values(_) -> erlang:nif_error(undef).
 
 %%% End of BIFs
 
+-spec get(Key, Map, Default) -> Value | Default when
+        Key :: term(),
+        Map :: map(),
+        Value :: term(),
+        Default :: term().
+
+get(Key, Map, Default) ->
+    case maps:find(Key, Map) of
+        {ok, Value} ->
+            Value;
+        error ->
+            Default
+    end.
+
+
 -spec fold(Fun,Init,Map) -> Acc when
     Fun :: fun((K, V, AccIn) -> AccOut),
     Init :: term(),
-- 
cgit v1.2.3