diff options
author | Joey Hess <joey@kodama.kitenet.net> | 2008-08-05 19:30:09 -0400 |
---|---|---|
committer | Joey Hess <joey@kodama.kitenet.net> | 2008-08-05 19:30:09 -0400 |
commit | c8d3626c51bdc53781d9431b1da88ae1e92dc2d5 (patch) | |
tree | afda46aa96a8f0ffc7b1ccb4ae1347dfc8c8812e /IkiWiki/Plugin | |
parent | 4f22989be1d0f901c4eb7b2be66e8483b3de30fa (diff) |
typo
Diffstat (limited to 'IkiWiki/Plugin')
-rw-r--r-- | IkiWiki/Plugin/websetup.pm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/IkiWiki/Plugin/websetup.pm b/IkiWiki/Plugin/websetup.pm index 2a5e27bf9..b110939e4 100644 --- a/IkiWiki/Plugin/websetup.pm +++ b/IkiWiki/Plugin/websetup.pm @@ -349,7 +349,10 @@ 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}} : ()); @@ -365,16 +368,20 @@ 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]; } } |