Revert "typo"
authorJoey Hess <joey@kodama.kitenet.net>
Tue, 5 Aug 2008 23:39:30 +0000 (19:39 -0400)
committerJoey Hess <joey@kodama.kitenet.net>
Tue, 5 Aug 2008 23:39:30 +0000 (19:39 -0400)
This reverts commit c8d3626c51bdc53781d9431b1da88ae1e92dc2d5.

IkiWiki.pm
IkiWiki/Plugin/websetup.pm
ikiwiki.in

index e1c4b6e2fdcb97ac2902c6e6fe0e78061f927ead..bf4a0d415ab0afc7270f25ca1ab9a7b4c2187a10 100644 (file)
@@ -1045,7 +1045,7 @@ sub preprocess ($$$;$$) { #{{{
                my $params=shift;
                $params="" if ! defined $params;
 
-               if (length $escape) {
+               f (length $escape) {
                        return "[[$prefix$command $params]]";
                }
                elsif (exists $hooks{preprocess}{$command}) {
index b110939e4d86cb637f29031caab2645fe1300539..2a5e27bf921ee98edc0ee7f12f1ca15497595368 100644 (file)
@@ -349,10 +349,7 @@ sub showform ($$) { #{{{
                                next;
                        }
 
-                       print STDERR "on $key\n";
-
                        if (ref $config{$key} eq "ARRAY" || ref $info{example} eq "ARRAY") {
-                               print STDERR "$key is array\n";
                                @value=sort grep { length $_ } @value;
                                my @oldvalue=sort grep { length $_ }
                                        (defined $config{$key} ? @{$config{$key}} : ());
@@ -368,20 +365,16 @@ sub showform ($$) { #{{{
                        }
                        else {
                                if (defined $config{$key} && $config{$key} eq $value[0]) {
-                                       print STDERR "$key SET SAME ($config{$key})\n";
                                        delete $rebuild{$field};
                                }
                                elsif (! defined $config{$key} && ! length $value[0]) {
-                                       print STDERR "$key UNDEF and unset\n";
                                        delete $rebuild{$field};
                                }
                                elsif ((! defined $config{$key} || ! $config{$key}) &&
                                       ! $value[0] && $info{type} eq "boolean") {
-                                       print STDERR "omitting false $key\n";
                                        delete $rebuild{$field};
                                }
                                else {
-                                       print STDERR "for $key : $value[0] vs $config{$key}; type: $info{type}\n";
                                        $config{$key}=$value[0];
                                }
                        }
index beb4052273d496c23bf33ba8080feff469407a6e..d8e848f8727c5dbfd11bc0f9ce976e0821b68cff 100755 (executable)
@@ -132,7 +132,7 @@ sub main () { #{{{
                        foreach my $wrapper (@wrappers) {
                                %config=(%origconfig,
                                        rebuild => 0,
-                                       verbose => undef,
+                                       verbose => 0,
                                        %{$wrapper},
                                );
                                checkconfig();