/[pub]/suikawiki/script/wiki.cgi
Suika

Diff of /suikawiki/script/wiki.cgi

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.39 by wakaba, Wed Dec 18 13:08:39 2002 UTC revision 1.40 by wakaba, Thu Dec 19 09:50:18 2002 UTC
# Line 903  sub make_custom_form ($$$$) { Line 903  sub make_custom_form ($$$$) {
903              &load_formatter (qw/form_input form_option/);              &load_formatter (qw/form_input form_option/);
904              $definition = &unescape ($definition);              $definition = &unescape ($definition);
905              $definition =~ s/\\(.)/$1/g;              $definition =~ s/\\(.)/$1/g;
             $definition .= ' %submit;' if $definition !~ /%submit/;  
906              $option = &unescape ($option);              $option = &unescape ($option);
907              $option =~ s/\\(.)/$1/g;              $option =~ s/\\(.)/$1/g;
908              $fmt{form_option}->replace ($option, $param);              $fmt{form_option}->replace ($option, $param);
909                $definition .= ' %submit;' if $definition !~ /%submit/ && !$param->{output}->{nosubmit};
910              my $target_page = $param->{output}->{page} || $form{mypage};              my $target_page = $param->{output}->{page} || $form{mypage};
911              $param->{form_disabled} = 1 if $fixedpage{$target_page};              $param->{form_disabled} = 1 if $fixedpage{$target_page};
912              my $target_form = $param->{output}->{id};              my $target_form = $param->{output}->{id};
Legend:
Removed from v.1.39  
changed lines
  Added in v.1.40
admin@suikawiki.org
 ViewVC Help
Powered by ViewVC 1.1.24