Ignore:
Timestamp:
04/18/09 13:18:36 (11 years ago)
Author:
felix winkelmann
Message:

minor changes

File:
1 edited

Legend:

Unmodified
Added
Removed
  • chicken/trunk/scripts/make-egg-index.scm

    r14287 r14292  
    77(import irregex)
    88
     9(define *help* #f)
    910(define *major-version* (##sys#fudge 41))
    1011
     
    4647
    4748(define (usage code)
    48   (print "make-egg-index.scm [--major-version=MAJOR] [DIR]")
     49  (print "make-egg-index.scm [--help] [--major-version=MAJOR] [DIR]")
    4950  (exit code))
    5051
     
    253254
    254255(define (main args)
     256  (when *help* (usage 0))
    255257  (match args
    256     (((or "-h" "-help" "--help") . _) (usage 0))
    257258    ((dir)
    258259     (make-egg-index dir))
Note: See TracChangeset for help on using the changeset viewer.