diff --git a/web/CXM_web_arg_utils.anubis b/web/CXM_web_arg_utils.anubis
index f96b433..4b0a285 100644
--- a/web/CXM_web_arg_utils.anubis
+++ b/web/CXM_web_arg_utils.anubis
@@ -105,7 +105,30 @@ public define String
     failure         then default_value
     success(value)  then value
   }.
-  
+
+public define Maybe(String)
+  get_Password
+  (
+    List(Web_arg) lwa,
+    String        pwd_1_name,
+    String        pwd_2_name
+  )=
+  if get_String(lwa, pwd_1_name) is
+  {
+    failure then failure,
+    success(password1) then
+      if get_String(lwa, pwd_2_name) is
+      {
+        failure then failure
+        success(password2) then
+        if password1 = password2 then
+          success(password1)
+        else
+          failure
+      }
+  }
+.
+
 public define Bool
   get_Bool
   (
--
libgit2 0.21.4