perl 5.005 needs an explicit mask for mkdir

[freeside.git] / bin / populate-msgcat

diff --git a/bin/populate-msgcat b/bin/populate-msgcat
index 64fa59a..166f837 100755 (executable)
--- a/bin/populate-msgcat
+++ b/bin/populate-msgcat
@@ -76,7 +76,11 @@ sub messages {
     },
 
     'illegal_password' => {
-      'en_US' => 'Illegal password',
+      'en_US' => 'Illegal password (',
+    },
+
+    'illeggal_password_characters' => {
+      'en_US' => ' characters)',
     },
 
     'username_in_use' => {
@@ -102,6 +106,10 @@ sub messages {
       #'en_US' => '',
     },
 
+    'expired_card' => {
+      'en_US' => 'Expired card',
+    },
+
   );
 }
 
@@ -109,4 +117,3 @@ sub usage {
   die "Usage:\n\n  populate-msgcat user\n";
 }
 
-