Changeset 1466 for trunk/base


Ignore:
Timestamp:
Dec 20, 2002, 9:45:47 PM (17 years ago)
Author:
jpm
Message:

stripped the full path when printing the bin name

Location:
trunk/base/src
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • trunk/base/src/pkg_mkindex.tcl

    r926 r1466  
    3030
    3131if {$argc < 1} {
    32         puts "Usage: $argv0 <directory list>"
     32        puts "Usage: [exec basename $argv0] <directory list>"
    3333        exit
    3434}
  • trunk/base/src/port/port.tcl

    r1450 r1466  
    3737proc print_usage args {
    3838    global argv0
    39     puts "Usage: $argv0 \[-vDq\] \[action\] \[-d portdir\] \[options\]"
     39    puts "Usage: [exec basename $argv0] \[-vDq\] \[action\] \[-d portdir\] \[options\]"
    4040}
    4141
    4242proc fatal args {
    4343    global argv0
    44     puts stderr "$argv0: $args"
     44    puts stderr "[exec basename $argv0]: $args"
    4545    exit
    4646}
  • trunk/base/src/port/portindex.tcl

    r1429 r1466  
    1313proc print_usage args {
    1414    global argv0
    15     puts "Usage: $argv0 \[-a\] \[-o output directory\] \[directory\]"
     15    puts "Usage: [exec basename $argv0] \[-a\] \[-o output directory\] \[directory\]"
    1616    puts "-a:\tArchive port directories (for remote sites). Requires -o option"
    1717    puts "-o:\tOutput all files to specified directory"
Note: See TracChangeset for help on using the changeset viewer.