diff options
| -rw-r--r-- | guix/scripts/copy.scm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/guix/scripts/copy.scm b/guix/scripts/copy.scm index 2542df6b19..fdb684c6b6 100644 --- a/guix/scripts/copy.scm +++ b/guix/scripts/copy.scm @@ -138,6 +138,10 @@ Copy ITEMS to or from the specified host over SSH.\n")) (let ((level (string->number* arg))) (alist-cons 'verbosity level (alist-delete 'verbosity result))))) + (option '(#\n "dry-run") #f #f + (lambda (opt name arg result) + (alist-cons 'dry-run? #t (alist-cons 'graft? #f result)))) + (option '(#\h "help") #f #f (lambda args (show-help) |