package: allow users to upgrade the whole system by not providing a regexp.

* guix/scripts/packages.scm (guix-package) [process-actions]: When upgrading,
use "" when REGEXP is #f.
* doc/guix.texi: update the documentation accordingly.
This commit is contained in:
Cyril Roelandt 2013-04-15 23:23:27 +02:00
parent 0160536dcb
commit acb6ba2567
2 changed files with 7 additions and 6 deletions

View File

@ -537,9 +537,10 @@ multiple-output package.
@itemx -r @var{package} @itemx -r @var{package}
Remove @var{package}. Remove @var{package}.
@item --upgrade=@var{regexp} @item --upgrade[=@var{regexp}]
@itemx -u @var{regexp} @itemx -u [@var{regexp}]
Upgrade all the installed packages matching @var{regexp}. Upgrade all the installed packages. When @var{regexp} is specified, upgrade
only installed packages whose name matches @var{regexp}.
Note that this upgrades package to the latest version of packages found Note that this upgrades package to the latest version of packages found
in the distribution currently installed. To update your distribution, in the distribution currently installed. To update your distribution,

View File

@ -328,7 +328,7 @@ Install, remove, or upgrade PACKAGES in a single transaction.\n"))
(display (_ " (display (_ "
-r, --remove=PACKAGE remove PACKAGE")) -r, --remove=PACKAGE remove PACKAGE"))
(display (_ " (display (_ "
-u, --upgrade=REGEXP upgrade all the installed packages matching REGEXP")) -u, --upgrade[=REGEXP] upgrade all the installed packages matching REGEXP"))
(display (_ " (display (_ "
--roll-back roll back to the previous generation")) --roll-back roll back to the previous generation"))
(newline) (newline)
@ -379,7 +379,7 @@ Install, remove, or upgrade PACKAGES in a single transaction.\n"))
(option '(#\r "remove") #t #f (option '(#\r "remove") #t #f
(lambda (opt name arg result) (lambda (opt name arg result)
(alist-cons 'remove arg result))) (alist-cons 'remove arg result)))
(option '(#\u "upgrade") #t #f (option '(#\u "upgrade") #f #t
(lambda (opt name arg result) (lambda (opt name arg result)
(alist-cons 'upgrade arg result))) (alist-cons 'upgrade arg result)))
(option '("roll-back") #f #f (option '("roll-back") #f #f
@ -602,7 +602,7 @@ Install, remove, or upgrade PACKAGES in a single transaction.\n"))
(let* ((installed (manifest-packages (profile-manifest profile))) (let* ((installed (manifest-packages (profile-manifest profile)))
(upgrade-regexps (filter-map (match-lambda (upgrade-regexps (filter-map (match-lambda
(('upgrade . regexp) (('upgrade . regexp)
(make-regexp regexp)) (make-regexp (or regexp "")))
(_ #f)) (_ #f))
opts)) opts))
(upgrade (if (null? upgrade-regexps) (upgrade (if (null? upgrade-regexps)