summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSimon Tournier <zimon.toutoune@gmail.com>2023-05-15 19:45:44 +0200
committerJosselin Poiret <dev@jpoiret.xyz>2023-05-17 22:22:21 +0200
commitb89ab866bc176cfc9fdddb4d5a1505611d119dd0 (patch)
tree5418ef88e05b4935ff34c7c97814fbb518d0a2a9
parent0540f4e20de3172ea09e27182e98b66b73c92421 (diff)
scripts: import: elpa: Warn when version is specified.
* guix/scripts/import/elpa.scm (guix-import-elpa): Warn when version is specified. Signed-off-by: Josselin Poiret <dev@jpoiret.xyz>
-rw-r--r--guix/scripts/import/elpa.scm7
1 files changed, 6 insertions, 1 deletions
diff --git a/guix/scripts/import/elpa.scm b/guix/scripts/import/elpa.scm
index 052b0cc0e7..a71478d3c8 100644
--- a/guix/scripts/import/elpa.scm
+++ b/guix/scripts/import/elpa.scm
@@ -3,6 +3,7 @@
;;; Copyright © 2018 Oleg Pykhalov <go.wigust@gmail.com>
;;; Copyright © 2020 Martin Becze <mjbecze@riseup.net>
;;; Copyright © 2021 Sarah Morgensen <iskarian@mgsn.dev>
+;;; Copyright © 2023 Simon Tournier <zimon.toutoune@gmail.com>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -91,7 +92,11 @@ Import the latest package named PACKAGE-NAME from an ELPA repository.\n"))
(_ #f))
(reverse opts))))
(match args
- ((package-name)
+ ((spec)
+ (define-values (package-name version)
+ (package-name->name+version spec))
+ (when version
+ (warning (G_ "this importer does not consider the version~%")))
(if (assoc-ref opts 'recursive)
(with-error-handling
(map (match-lambda