diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2017-05-21 11:49:07 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2017-05-21 11:49:07 +0200 |
| commit | 8a29dc07a4b62ee480490137592cf02c33b1799f (patch) | |
| tree | 8f51e44ff3bd93e2175f7b063206924d1f820264 | |
| parent | 092c58e74513fd4056c064098540421a5e9a5c5f (diff) | |
guix system: Don't warn about old distros for "guix system init".
* guix/scripts/system.scm (process-action): Don't call
'warn-about-old-distro' when ACTION is 'init' or 'build'.
| -rw-r--r-- | guix/scripts/system.scm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/guix/scripts/system.scm b/guix/scripts/system.scm index 6977a578448..ede158c17c7 100644 --- a/guix/scripts/system.scm +++ b/guix/scripts/system.scm | |||
| @@ -847,8 +847,10 @@ resulting from command-line parsing." | |||
| 847 | ((shepherd-graph) | 847 | ((shepherd-graph) |
| 848 | (export-shepherd-graph os (current-output-port))) | 848 | (export-shepherd-graph os (current-output-port))) |
| 849 | (else | 849 | (else |
| 850 | (warn-about-old-distro #:suggested-command | 850 | (unless (memq action '(build init)) |
| 851 | "guix system reconfigure") | 851 | (warn-about-old-distro #:suggested-command |
| 852 | "guix system reconfigure")) | ||
| 853 | |||
| 852 | (perform-action action os | 854 | (perform-action action os |
| 853 | #:dry-run? dry? | 855 | #:dry-run? dry? |
| 854 | #:derivations-only? (assoc-ref opts | 856 | #:derivations-only? (assoc-ref opts |
