diff options
author | Ludovic Courtès <ludo@gnu.org> | 2021-05-28 10:53:49 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2021-05-28 11:36:02 +0200 |
commit | 681af1fb78a735b51dc811aed770b2948212c3fc (patch) | |
tree | 9c033b89bb1865362b0329c679eb01a677ed9499 /guix/scripts/graph.scm | |
parent | 7243a8c7ecf1421183d01cbd4631191a861376a4 (diff) | |
download | guix-patches-681af1fb78a735b51dc811aed770b2948212c3fc.tar guix-patches-681af1fb78a735b51dc811aed770b2948212c3fc.tar.gz |
scripts: Commands warn when passed zero arguments.
This is a followup to 3f8326237df780404c172ef4127195cc20becd66.
* guix/scripts/archive.scm (export-from-store): Warn then FILES is
empty.
* guix/scripts/build.scm (guix-build): Likewise.
* guix/scripts/copy.scm (warn-if-empty): New procedure.
(send-to-remote-host, retrieve-from-remote-host): Call it.
* guix/scripts/edit.scm (guix-edit): Warn when SPECS is empty.
* guix/scripts/environment.scm (guix-environment): Warn when MANIFEST
has zero entries.
* guix/scripts/graph.scm (guix-graph): Warn then ITEMS is empty.
* guix/scripts/package.scm (process-actions): Warn when FILES and TRANS
are both empty.
Diffstat (limited to 'guix/scripts/graph.scm')
-rw-r--r-- | guix/scripts/graph.scm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/guix/scripts/graph.scm b/guix/scripts/graph.scm index ddfc6ba497..66de824ef4 100644 --- a/guix/scripts/graph.scm +++ b/guix/scripts/graph.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2015, 2016, 2017, 2018, 2019, 2020 Ludovic Courtès <ludo@gnu.org> +;;; Copyright © 2015, 2016, 2017, 2018, 2019, 2020, 2021 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2019 Simon Tournier <zimon.toutoune@gmail.com> ;;; ;;; This file is part of GNU Guix. @@ -593,6 +593,9 @@ Emit a representation of the dependency graph of PACKAGE...\n")) (read/eval-package-expression exp))) (_ #f)) opts))) + (when (null? items) + (warning (G_ "no arguments specified; creating an empty graph~%"))) + (run-with-store store ;; XXX: Since grafting can trigger unsolicited builds, disable it. (mlet %store-monad ((_ (set-grafting #f)) |