Changeset 162

Show
Ignore:
Timestamp:
02/20/07 14:22:36 (2 years ago)
Author:
ingy
Message:
 r3436@skinny:  ingy | 2007-02-20 14:13:41 -0800
 V1 index.cgi can be simpler.
Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/src/core/Kwiki/lib/Kwiki/Files/V1.pm

    r161 r162  
    1010__index.cgi__ 
    1111#!/usr/bin/perl 
    12 use strict; 
    13 BEGIN { 
    14     my $fh; 
    15     for (qw(_kwiki .ht_kwiki)) { open $fh, $_ and last } 
    16     do { $ENV{$1} ||= $2 if /^(\w+)\s*=\s*['"]?(.*?)['"]?\s*$/ } for <$fh>; 
    17 } 
    18 use lib grep { -e } split /:/, $ENV{KWIKI_LIB_PATH} || 'lib'; 
     12use lib 'lib'; 
    1913use Kwiki::Boot; 
    2014Kwiki::Boot->debug->boot->kwiki->process;