/[pub]/suikawiki/script/misc/plugins/bugtrack.wp2
Suika

Diff of /suikawiki/script/misc/plugins/bugtrack.wp2

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

revision 1.2 by wakaba, Wed Feb 18 07:22:11 2004 UTC revision 1.3 by wakaba, Mon Mar 29 03:21:24 2004 UTC
# Line 502  ViewDefinition: Line 502  ViewDefinition:
502                    sprintf '%04d-%02d-%02d %02d:%02d:%02d +00:00',                    sprintf '%04d-%02d-%02d %02d:%02d:%02d +00:00',
503                            $time[5]+1900,$time[4]+1,@time[3,2,1,0];                            $time[5]+1900,$time[4]+1,@time[3,2,1,0];
504        push @page, '';        push @page, '';
505        push @page, '[1] ' . $o->{wiki}->{input}->parameter ('body');        push @page, '[1] ' . "\n" . $o->{wiki}->{input}->parameter ('bt--body');
506        $wiki->{db}->set (content => $o->{bt__bug}->{bug_page}        $wiki->{db}->set (content => $o->{bt__bug}->{bug_page}
507                                  => join "\x0A", @page);                                  => join "\x0A", @page);
508        $wiki->{db}->set (lastmodified => $o->{bt__bug}->{bug_page}        $wiki->{db}->set (lastmodified => $o->{bt__bug}->{bug_page}
# Line 514  ViewDefinition: Line 514  ViewDefinition:
514                
515        require SuikaWiki::Output::HTTP;        require SuikaWiki::Output::HTTP;
516        my $output = SuikaWiki::Output::HTTP->new (wiki => $self->{view}->{wiki});        my $output = SuikaWiki::Output::HTTP->new (wiki => $self->{view}->{wiki});
517        $output->set_redirect (uri => $uri, status_code => 303);        $output->set_redirect (uri => $uri, status_code => 303,
518                                 status_phrase => q(Created));
519          ## Should we use 201 Created?          ## Should we use 201 Created?
520        $output->output (output => 'http-cgi');        $output->output (output => 'http-cgi');
521      @@Name: main      @@Name: main
# Line 569  Resource: Line 570  Resource:
570          label=>{%res (name => {BugTrack:CreateForm:MainText:Label});}p,          label=>{%res (name => {BugTrack:CreateForm:MainText:Label});}p,
571        );        );
572        %submit (label => {%res (name => {Form:Label:Add});}p,        %submit (label => {%res (name => {Form:Label:Add});}p,
573                 description => {%res (name => {Form:Label:Description});}p);                 description => {%res (name => {Form:Description:Add});}p);
574      }p);      }p);
575    @BugTrack:CreateForm:MainText:Label:    @BugTrack:CreateForm:MainText:Label:
576      @@@: Bug description      @@@: Bug description
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
admin@suikawiki.org
 ViewVC Help
Powered by ViewVC 1.1.24