Changeset 320

Show
Ignore:
Timestamp:
02/17/08 16:34:42 (5 months ago)
Author:
ingy
Message:
fmerges++ fixed kwiki -start
Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/src/plugins/cpan/HTTP-Server-Simple-Kwiki-0.29/lib/HTTP/Server/Simple/Kwiki.pm

    r229 r320  
    1919    $self->serve_static($cgi, "."); 
    2020  } else { 
    21     my $capture = IO::Capture::Stdout->new(); 
    22     $capture->start(); 
    23     Kwiki::Boot->debug->boot->kwiki->process; 
    24     $capture->stop(); 
    25     my $output = join '', $capture->read; 
     21    my $output = ''; 
     22    open my $fh, '>', \$output or die "Can't open: $!"; 
     23    { 
     24        my $old_fh = select $fh; 
     25        Kwiki::Boot->debug->boot->kwiki->process; 
     26        select $old_fh; 
     27    } 
    2628 
    2729    if ($output =~ m{^Status: 302}) {