2 files changed, 4 insertions(+), 1 deletions(-)

M guix-package.in
M tests/guix-package.sh

@@ 326,7 326,7 @@ Install, remove, or upgrade PACKAGES in a single transaction.\n"))
                (lambda (opt name arg result)
                  (leave (_ "~A: unrecognized option~%") name))
                (lambda (arg result)
-                 (alist-cons 'argument arg result))
+                 (leave (_ "~A: extraneous argument~%") arg))
                %default-options))
 
   (define (guile-missing?)

@@ 139,3 139,6 @@ fi
 # Failed attempt to roll back.
 if guix-package --bootstrap --roll-back;
 then false; else true; fi
+
+# Extraneous argument.
+! guix-package install foo-bar