Show
Ignore:
Timestamp:
10/21/08 13:08:20 (5 years ago)
Author:
Nick_Lewis
Message:

another go to correct my publish perl floundering

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • contributed_modules/modules/publish.pl

    r7055 r7056  
    77while ($moddir = shift @ARGV) { 
    88  if (($moddir eq "-h") || ($moddir eq "-help") || ($moddir eq "--h") || ($moddir eq "--help")) { 
    9     print $moddir; 
    10 #   die "Usage: publish <moduledirectory>\n"; 
     9    die "Usage: publish <moduledirectory> [moduledirectory]\n"; 
    1110  } 
    1211  next if (!-d $moddir);