avoid standalone -e or foo syntax

I prefer to use either of the other two syntaxes perl offers, and not this
one.

diff --git a/IkiWiki/Plugin/po.pm b/IkiWiki/Plugin/po.pm
index daac95eb1ca6a11022058433fd79cbd86489669e..be7a28722845ab099a09a8108f4af0b1c0ad23c0 100644 (file)
--- a/IkiWiki/Plugin/po.pm
+++ b/IkiWiki/Plugin/po.pm
@@ -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));