~ruther/guix-local

dc3f1809cf4637fcf30d9c1789fa0eb96aefd0f5 — Ludovic Courtès 13 years ago ba4bcae
scripts: Remove hyphen in the command name shown by `--version'.

* 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.
M guix/scripts/build.scm => guix/scripts/build.scm +1 -1
@@ 105,7 105,7 @@ Build the given PACKAGE-OR-DERIVATION and return their output paths.\n"))
                  (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)

M guix/scripts/download.scm => guix/scripts/download.scm +1 -1
@@ 104,7 104,7 @@ and the hash of its contents.\n"))
                  (exit 0)))
        (option '(#\V "version") #f #f
                (lambda args
                  (show-version-and-exit "guix-download")))))
                  (show-version-and-exit "guix download")))))


;;;

M guix/scripts/gc.scm => guix/scripts/gc.scm +1 -1
@@ 97,7 97,7 @@ interpreted."
                  (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)

M guix/scripts/import.scm => guix/scripts/import.scm +1 -1
@@ 85,7 85,7 @@ Import and convert the Nix expression ATTRIBUTE of NIXPKGS.\n"))
                  (exit 0)))
        (option '(#\V "version") #f #f
                (lambda args
                  (show-version-and-exit "guix-import")))))
                  (show-version-and-exit "guix import")))))


;;;

M guix/scripts/package.scm => guix/scripts/package.scm +1 -1
@@ 327,7 327,7 @@ Install, remove, or upgrade PACKAGES in a single transaction.\n"))
                  (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)