Update .po file, and make prettify function do nget() properly.

mysociety · Oct 8, 2012 · 2b0fc37 · 2b0fc37
1 parent 7a3b06d
commit 2b0fc37
Show file tree

Hide file tree

Showing 5 changed files with 241 additions and 195 deletions.
diff --git a/bin/gettext-nget-patch b/bin/gettext-nget-patch
@@ -18,16 +18,17 @@ find( sub {
         do {
             $text .= <FP>;
         } until $text =~ /\)/;
-        $text =~ /nget\(\s*"(.*?)"\s*,\s*"(.*?)"\s*,\s*(.*?)\s*\)/s;
-        $out{$1} = {
-            file => $File::Find::name,
-            line => $line,
-            s => $1,
-            p => $2,
-        };
+        if ($text =~ /nget\(\s*"(.*?)"\s*,\s*"(.*?)"\s*,\s*(.*?)\s*\)/s) {
+            $out{$1} = {
+                file => $File::Find::name,
+                line => $line,
+                s => $1,
+                p => $2,
+            };
+        }
     }
     close FP;
-}, 'templates');
+}, 'templates', 'perllib');
 
 foreach (values %out) {
     print <<EOF;