diff options
| author | Alex Kost <alezost@gmail.com> | 2014-10-16 21:35:47 +0400 |
|---|---|---|
| committer | Alex Kost <alezost@gmail.com> | 2014-10-17 10:56:27 +0400 |
| commit | 189cea2782df67ea048a3982be69c8b1ff9762e9 (patch) | |
| tree | f353da6c0b24a43cfad0da4635e3deaa7f7b1d71 /emacs/guix-base.el | |
| parent | 347e17b47450a0fcc120c29e8b307e87b9182c21 (diff) | |
| download | guix-189cea2782df67ea048a3982be69c8b1ff9762e9.tar.gz | |
emacs: Add 'guix-generations-by-time' command.
* emacs/guix-main.scm (find-generations): Add finding generations by time. * emacs/guix-utils.el (guix-read-date): New procedure. * emacs/guix-base.el (guix-messages): Add new messages. * emacs/guix.el (guix-generations-by-time): New command. * doc/emacs.texi (emacs Commands): Document it.
Diffstat (limited to 'emacs/guix-base.el')
| -rw-r--r-- | emacs/guix-base.el | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/emacs/guix-base.el b/emacs/guix-base.el index 15a26de01e..e9c1e00245 100644 --- a/emacs/guix-base.el +++ b/emacs/guix-base.el @@ -626,7 +626,11 @@ This function will not update the information, use (all (0 "No available generations.") (1 "A single available generation.") - (many "%d available generations." count))))) + (many "%d available generations." count)) + (time + (0 "Generations not found.") + (1 "A single generation matching time period.") + (many "%d generations matching time period." count))))) (defun guix-result-message (entries entry-type search-type search-vals) "Display an appropriate message after displaying ENTRIES." |