diff options
| -rw-r--r-- | guix/ui.scm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/guix/ui.scm b/guix/ui.scm index 7f52518023..bd504c68da 100644 --- a/guix/ui.scm +++ b/guix/ui.scm @@ -13,7 +13,7 @@ ;;; Copyright © 2018 Ricardo Wurmus <[email protected]> ;;; Copyright © 2019 Chris Marusich <[email protected]> ;;; Copyright © 2019, 2020 Tobias Geerinckx-Rice <[email protected]> -;;; Copyright © 2019 Simon Tournier <[email protected]> +;;; Copyright © 2019, 2021 Simon Tournier <[email protected]> ;;; Copyright © 2020 Arun Isaac <[email protected]> ;;; Copyright © 2020 Maxim Cournoyer <[email protected]> ;;; @@ -2133,11 +2133,11 @@ found." (lambda () (match (search-path (extension-directories) (format #f "~a.scm" command)) + (#f + (throw 'misc-error)) (file - (load file) - (resolve-interface `(guix extensions ,command))) - (_ - (throw 'misc-error)))) + (load file) + (resolve-interface `(guix extensions ,command))))) (lambda _ (format (current-error-port) (G_ "guix: ~a: command not found~%") command) |