Changeset 5887

Timestamp:

07/06/09 21:59:53 (3 years ago)

Author:

ryan52

Message:

fix po->mo in dev.pl

File:

• trunk/Padre/dev.pl (modified) (2 diffs)

trunk/Padre/dev.pl

@@ -25 +25 @@
 }
 
-msgfmt($FindBin::Bin);
+sub vmsgfmt {
+    # I wonder if it should be verbose by default...
+    my $d = shift . "/share/locale/";
+    print "msgfmting $d\n";
+    msgfmt({in => $d, verbose => 1});
+}
+
+vmsgfmt($FindBin::Bin);
 
 my $perl = get_perl();
@@ -54 +61 @@
             (my $path = $plugin) =~ s{-}{/}g;
             if (-d  "$dir/$plugin/share/locale" ) {
-                msgfmt("$dir/$plugin");
+                vmsgfmt("$dir/$plugin");
             } elsif (-d "$dir/$plugin/lib/$path/share/locale") {
-                msgfmt("$dir/$plugin/lib/$path");
+                vmsgfmt("$dir/$plugin/lib/$path");
             }
             push @cmd, "-I$dir/$plugin/lib";