Changeset 22

Show
Ignore:
Timestamp:
12/14/06 19:05:17 (2 years ago)
Author:
ingy
Message:
 r2323@skinny-2:  ingy | 2006-12-14 19:03:10 -0800
 Add the lib symlink on -update, if it doesn't exist. Useful for upgrades.
Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/bin/kwiki

    r20 r22  
    4141    eval "use lib '$base/lib'; 1" 
    4242      or die $@; 
    43     if (1 || XXX("XXX - Only for test")) { 
     43#     $ENV{KWIKI_TEST} = 1; 
     44    if ($ENV{KWIKI_TEST}) { 
    4445        @INC = ( 
    4546            "$base/lib", 

  • trunk/core/Kwiki/lib/Kwiki/Command.pm

    r20 r22  
    125125    $self->create_registry; 
    126126    $self->install($_) for $self->all_class_ids; 
     127    io->link('lib')->symlink("$ENV{KWIKI_BASE}/lib") 
     128      if defined $ENV{KWIKI_BASE} and not -e 'lib'; 
    127129    $self->set_permissions; 
    128130}