summaryrefslogtreecommitdiff
path: root/guix/scripts/package.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2013-09-22 21:50:11 +0200
committerLudovic Courtès <ludo@gnu.org>2013-09-23 00:33:50 +0200
commitbd9bde1cba7190ed8b87aefbd09b1e25c5acbf31 (patch)
tree5bce6c29a30f57bfab37a712ced30e2d2a8580a9 /guix/scripts/package.scm
parenta7a4e6a4f719da8d0b26d9a60ff8ed42691d263f (diff)
guix package: Show most recently installed packages last.
Suggested by Andreas Enge <andreas@enge.fr>. * guix/scripts/package.scm (guix-package)[list-generations, list-installed]: Reverse the result of 'manifest-packages'. * doc/guix.texi (Invoking guix package): Document the order of packages for '--list-generations' and '--list-installed'.
Diffstat (limited to 'guix/scripts/package.scm')
-rw-r--r--guix/scripts/package.scm13
1 files changed, 9 insertions, 4 deletions
diff --git a/guix/scripts/package.scm b/guix/scripts/package.scm
index c0cedcd4a8..1d00e39540 100644
--- a/guix/scripts/package.scm
+++ b/guix/scripts/package.scm
@@ -965,9 +965,12 @@ more information.~%"))
((name version output location _)
(format #t " ~a\t~a\t~a\t~a~%"
name version output location)))
- (manifest-packages
- (profile-manifest
- (format #f "~a-~a-link" profile number))))
+
+ ;; Show most recently installed packages last.
+ (reverse
+ (manifest-packages
+ (profile-manifest
+ (format #f "~a-~a-link" profile number)))))
(newline)))
(cond ((not (file-exists? profile)) ; XXX: race condition
@@ -994,7 +997,9 @@ more information.~%"))
(regexp-exec regexp name))
(format #t "~a\t~a\t~a\t~a~%"
name (or version "?") output path))))
- installed)
+
+ ;; Show most recently installed packages last.
+ (reverse installed))
#t))
(('list-available regexp)