Changeset 12844 in project


Ignore:
Timestamp:
12/18/08 08:42:00 (12 years ago)
Author:
felix winkelmann
Message:

actually removed the options

Location:
chicken/trunk
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • chicken/trunk/chicken-install.scm

    r12819 r12844  
    348348  -i   -init DIRECTORY          initialize empty alternative repository
    349349  -u   -update-db               update export database
    350   -r   -repository DIRECTORY    specify alternative extension repository
    351350EOF
    352351);|
     
    436435                        (set! *password* (cadr args))
    437436                        (loop (cddr args) eggs))
    438                        ((or (string=? arg "-r") (string=? arg "-repository"))
    439                         (if (pair? (cdr args))
    440                             (repository-path (cadr args))
    441                             (usage 1)))
    442437                       ((and (positive? (string-length arg))
    443438                             (char=? #\- (string-ref arg 0)))
  • chicken/trunk/chicken-status.scm

    r12819 r12844  
    9191  -v   -version                 show version and exit
    9292  -f   -files                   list installed files
    93   -r   -repository DIRECTORY    specify alternative extension repository
    9493EOF
    9594);|
     
    115114                     (set! files #t)
    116115                     (loop (cdr args) pats))
    117                     ((or (string=? arg "-r") (string=? arg "-repository"))
    118                      (if (pair? (cdr args))
    119                          (repository-path (cadr args))
    120                          (usage 1)))
    121116                    ((or (string=? arg "-v") (string=? arg "-version"))
    122117                     (print (chicken-version))
  • chicken/trunk/chicken-uninstall.scm

    r12819 r12844  
    8181       -force                   don't ask, delete whatever matches
    8282  -s   -sudo                    use sudo(1) for deleting files
    83   -r   -repository DIRECTORY    specify alternative extension repository
    8483EOF
    8584);|
     
    103102                   (set! *force* #t)
    104103                   (loop (cdr args) pats))
    105                   ((or (string=? arg "-r") (string=? arg "-repository"))
    106                    (if (pair? (cdr args))
    107                        (repository-path (cadr args))
    108                        (usage 1)))
    109104                  ((or (string=? arg "-s") (string=? arg "-sudo"))
    110105                   (sudo-install #t)
Note: See TracChangeset for help on using the changeset viewer.