Add missing getopts::groups::optflagmulti function

diff --git a/src/libextra/getopts.rs b/src/libextra/getopts.rs
index 8bd9d857d6957135724c0acf978926dd61bc0647..5ec6713509ec02b35f57a7df7ebdaa4b2bca77c5 100644 (file)
--- a/src/libextra/getopts.rs
+++ b/src/libextra/getopts.rs
@@ -542,6 +542,20 @@ pub fn optflag(short_name: &str, long_name: &str,
                 occur: Optional};
     }
 
+    /// Create a long option that can occur more than once and does not
+    /// take an argument
+    pub fn optflagmulti(short_name: &str, long_name: &str,
+                   desc: &str) -> OptGroup {
+        let len = short_name.len();
+        assert!(len == 1 || len == 0);
+        return OptGroup {short_name: short_name.to_owned(),
+                long_name: long_name.to_owned(),
+                hint: ~"",
+                desc: desc.to_owned(),
+                hasarg: No,
+                occur: Multi};
+    }
+
     /// Create a long option that is optional and takes an optional argument
     pub fn optflagopt(short_name: &str, long_name: &str,
                       desc: &str, hint: &str) -> OptGroup {