* Allow svnpath config option to contain additional extra slashes anywhere

[ikiwiki.git] / IkiWiki / Wrapper.pm

diff --git a/IkiWiki/Wrapper.pm b/IkiWiki/Wrapper.pm
index e761085fb8d54cad74fdd41fe29071e93cac5c0d..9415d4a17646a47ef41228bf8bada9a3795d8b28 100644 (file)
--- a/IkiWiki/Wrapper.pm
+++ b/IkiWiki/Wrapper.pm
@@ -57,8 +57,10 @@ EOF
        my $configstring=Data::Dumper->Dump([\%config], ['*config']);
        $configstring=~s/\\/\\\\/g;
        $configstring=~s/"/\\"/g;
-       $configstring=~s/\n/\\\n/g;
+       $configstring=~s/\n/\\n/g;
        
+       #translators: The first parameter is a filename, and the second is
+       #translators: a (probably not translated) error message.
        open(OUT, ">$wrapper.c") || error(sprintf(gettext("failed to write %s: %s"), "$wrapper.c", $!));;
        print OUT <<"EOF";
 /* A wrapper for ikiwiki, can be safely made suid. */
@@ -94,6 +96,7 @@ $envsave
 EOF
        close OUT;
        if (system("gcc", "$wrapper.c", "-o", $wrapper) != 0) {
+               #translators: The parameter is a C filename.
                error(sprintf(gettext("failed to compile %s"), "$wrapper.c"));
        }
        unlink("$wrapper.c");
@@ -101,7 +104,9 @@ EOF
            ! chmod(oct($config{wrappermode}), $wrapper)) {
                error("chmod $wrapper: $!");
        }
-       printf(gettext("successfully generated %s\n"), $wrapper);
+       #translators: The parameter is a filename.
+       printf(gettext("successfully generated %s"), $wrapper);
+       print "\n";
 } #}}}
 
 1