/[suikacvs]/test/html-webhacc/WebHACC/Output.pm
Suika

Diff of /test/html-webhacc/WebHACC/Output.pm

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

revision 1.16 by wakaba, Fri Aug 15 05:53:23 2008 UTC revision 1.18 by wakaba, Fri Aug 15 12:11:56 2008 UTC
# Line 443  sub nl_text ($$;%) { Line 443  sub nl_text ($$;%) {
443          $msg =~ s{<var>{text}</var>}{          $msg =~ s{<var>{text}</var>}{
444            defined $opt{text} ? $htescape->($opt{text}) : ''            defined $opt{text} ? $htescape->($opt{text}) : ''
445          }ge;          }ge;
446            $msg =~ s{<var>{value}</var>}{
447              defined $opt{value} ? $htescape->($opt{value}) : ''
448            }ge;
449          $msg =~ s{<var>{local-name}</var>}{          $msg =~ s{<var>{local-name}</var>}{
450            UNIVERSAL::can ($node, 'manakai_local_name')            UNIVERSAL::can ($node, 'manakai_local_name')
451              ? $htescape->($node->manakai_local_name) : ''              ? $htescape->($node->manakai_local_name) : ''
# Line 627  sub generate_input_section ($$) { Line 630  sub generate_input_section ($$) {
630    $out->end_tag ('form');    $out->end_tag ('form');
631    $out->end_section;    $out->end_section;
632    
   $out->end_tag ('fieldset');  
   
633    ## TODO: File upload    ## TODO: File upload
634    
635    $out->start_section (id => 'input-text', title => 'By direct input',    $out->start_section (id => 'input-text', title => 'By direct input',
Legend:
Removed from v.1.16  
changed lines
  Added in v.1.18
admin@suikawiki.org
 ViewVC Help
Powered by ViewVC 1.1.24