Changeset 1808

Timestamp:

07/07/06 22:41:15 (2 years ago)

Author:

augur

Message:

Patch to fixperl.pl from Peter Karman (thanks!)

Files:

• trunk/swish-e/src/win32/fixperl.pl (modified) (1 diff)

trunk/swish-e/src/win32/fixperl.pl

@@ -52 +52 @@
-    while ( <INF> ) {
-        for my $setting ( @config_options ) {
-\@\@$setting\@\@/$config->{$setting}
+qw\( \@\@$setting\@\@ \)/'$config->{$setting}'
-        }
-        print OUTF;