[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Minibuffer tray to display current time and date
From: |
Alexander Shukaev |
Subject: |
Re: Minibuffer tray to display current time and date |
Date: |
Fri, 1 May 2015 06:49:56 +0200 |
I came up with the following code to right-justify:
(setq-default minibuffer-line-format
`((:eval
(let ((string (concat
(propertize (format-time-string
"%Y.%m.%d")
'face
'minibuffer-line-date)
" "
(propertize (format-time-string "%A")
'face
'minibuffer-line-weekday)
" "
(propertize (format-time-string "%R")
'face
'minibuffer-line-time))))
(concat (propertize " "
'display
`((space :align-to
(- right
(length ,string)))))
string)))))
But it does not do what it should do. Faces are not propagated and
alignment too. What's wrong with this code?
- Re: Minibuffer tray to display current time and date,
Alexander Shukaev <=