mirror/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2025-01-19 14:07:01 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

scripts: Remove hyphen in the command name shown by `--version'.

Browse source 
* guix/scripts/build.scm (%options): Remove hyphen from the name passed
  to `show-version-and-exit'.
* guix/scripts/download.scm (%options): Likewise.
* guix/scripts/gc.scm (%options): Likewise.
* guix/scripts/import.scm (%options): Likewise.
* guix/scripts/package.scm (%options): Likewise.
This commit is contained in:
Ludovic Courtès 2013-02-17 16:25:30 +01:00
parent ba4bcae035
commit dc3f1809cf
5 changed files with 5 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
guix/scripts/build.scm
View file

@ -105,7 +105,7 @@ (define %options
(exit 0)))
(option '(#\V "version") #f #f
(lambda args
(show-version-and-exit "guix-build")))
(show-version-and-exit "guix build")))
(option '(#\S "source") #f #f
(lambda (opt name arg result)

2
guix/scripts/download.scm
View file

@ -104,7 +104,7 @@ (define fmt-proc
(exit 0)))
(option '(#\V "version") #f #f
(lambda args
(show-version-and-exit "guix-download")))))
(show-version-and-exit "guix download")))))
;;;

2
guix/scripts/gc.scm
View file

@ -97,7 +97,7 @@ (define %options
(exit 0)))
(option '(#\V "version") #f #f
(lambda args
(show-version-and-exit "guix-gc")))
(show-version-and-exit "guix gc")))
(option '(#\C "collect-garbage") #f #t
(lambda (opt name arg result)

2
guix/scripts/import.scm
View file

@ -85,7 +85,7 @@ (define %options
(exit 0)))
(option '(#\V "version") #f #f
(lambda args
(show-version-and-exit "guix-import")))))
(show-version-and-exit "guix import")))))
;;;

2
guix/scripts/package.scm
View file

@ -327,7 +327,7 @@ (define %options
(exit 0)))
(option '(#\V "version") #f #f
(lambda args
(show-version-and-exit "guix-package")))
(show-version-and-exit "guix package")))
(option '(#\i "install") #t #f
(lambda (opt name arg result)