mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-11-08 07:56:16 -05:00
ui: Highlight heading of generation lists.
* guix/ui.scm (display-generation): Highlight the "Generation" heading.
This commit is contained in:
parent
c1c5d68a94
commit
3dae43a929
1 changed files with 1 additions and 1 deletions
|
@ -1564,7 +1564,7 @@ (define generation-ctime-alist
|
||||||
(define (display-generation profile number)
|
(define (display-generation profile number)
|
||||||
"Display a one-line summary of generation NUMBER of PROFILE."
|
"Display a one-line summary of generation NUMBER of PROFILE."
|
||||||
(unless (zero? number)
|
(unless (zero? number)
|
||||||
(let ((header (format #f (G_ "Generation ~a\t~a") number
|
(let ((header (format #f (highlight (G_ "Generation ~a\t~a")) number
|
||||||
(date->string
|
(date->string
|
||||||
(time-utc->date
|
(time-utc->date
|
||||||
(generation-time profile number))
|
(generation-time profile number))
|
||||||
|
|
Loading…
Reference in a new issue