avoid standalone -e or foo syntax
authorJoey Hess <joey@gnu.kitenet.net>
Mon, 26 Jan 2009 18:10:37 +0000 (13:10 -0500)
committerJoey Hess <joey@gnu.kitenet.net>
Mon, 26 Jan 2009 18:10:37 +0000 (13:10 -0500)
I prefer to use either of the other two syntaxes perl offers, and not this
one.

IkiWiki/Plugin/po.pm

index daac95eb1ca6a11022058433fd79cbd86489669e..be7a28722845ab099a09a8108f4af0b1c0ad23c0 100644 (file)
@@ -851,9 +851,9 @@ sub refreshpofiles ($@) {
        my @pofiles=@_;
 
        my $potfile=potfile($masterfile);
-       (-e $potfile)
-               or error("po(refreshpofiles) ".sprintf(gettext("POT file (%s) does not exist"),
-                                                      $potfile));
+       if (! -e $potfile) {
+               error("po(refreshpofiles) ".sprintf(gettext("POT file (%s) does not exist"), $potfile));
+       }
 
        foreach my $pofile (@pofiles) {
                IkiWiki::prep_writefile(basename($pofile),dirname($pofile));