Show
Ignore:
Timestamp:
01/08/08 17:36:04 (6 years ago)
Author:
yappo
Message:

lang/perl/Config-Pit: oops

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • lang/perl/Config-Pit/trunk/bin/ppit

    r4215 r4216  
    1919    }, 
    2020    switch => sub { 
    21         Config::Pit::switch($name || shift); 
     21        Config::Pit::switch(shift); 
    2222    }, 
    2323}->{(shift || '')} || sub { pod2usage } )->(@ARGV[1..2]);