From: Alexander Shukaev <haroogan@gmail.com>
To: Stefan Monnier <monnier@iro.umontreal.ca>
Cc: help-gnu-emacs <help-gnu-emacs@gnu.org>
Subject: Re: Minibuffer tray to display current time and date
Date: Tue, 12 May 2015 13:34:20 +0200 [thread overview]
Message-ID: <CAKu-7WzBGGiJqoT7AQ4NYzUuZp6gfeNvYawfggSBfbP7S1ak9Q@mail.gmail.com> (raw)
In-Reply-To: <jwv8ud1c1u7.fsf-monnier+gmane.emacs.help@gnu.org>
On Wed, May 6, 2015 at 2:49 PM, Stefan Monnier <monnier@iro.umontreal.ca>
wrote:
> > `((space :align-to
> > (- right
> > (length ,string)))))
>
> If you look at the documentation for the display property, and more
> specifically for the `space' specifications, you'll see that the HPOS
> element can be of the form:
>
> EXPR ::= NUM | (NUM) | UNIT | ELEM | POS | IMAGE | FORM
> NUM ::= INTEGER | FLOAT | SYMBOL
> UNIT ::= in | mm | cm | width | height
> ELEM ::= left-fringe | right-fringe | left-margin | right-margin
> | scroll-bar | text
> POS ::= left | center | right
> FORM ::= (NUM . EXPR) | (OP EXPR ...)
> OP ::= + | -
>
> So, as you can see, there is no "(length EXP)" form in there.So you need
> to use
>
> ,(length string)
>
> instead of
>
> (length ,string)
>
>
> -- Stefan
>
Thanks for this remark, Stefan. I've modified the code and it looks
now
as follows:
(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
right-fringe
,(length string)))))
string)))))
It is aligned correctly now, but the faces are still not propagated, or
rather only the first one is (the default one from `display' alignment). I
feel like I don't understand something fundamental about `eval:' or maybe
there is a bug here? I'd be grateful if you could explain this problem.
Thank you.
Regards,
Alexander
next prev parent reply other threads:[~2015-05-12 11:34 UTC|newest]
Thread overview: 37+ messages / expand[flat|nested] mbox.gz Atom feed top
2015-04-22 16:07 Minibuffer tray to display current time and date Alexander Shukaev
2015-04-22 16:11 ` Eli Zaretskii
2015-04-22 16:17 ` Alexander Shukaev
2015-04-22 16:57 ` Michael Heerdegen
2015-04-22 17:05 ` Stefan Monnier
[not found] ` <mailman.1379.1429722347.904.help-gnu-emacs@gnu.org>
2015-04-23 0:59 ` Emanuel Berg
2015-04-23 15:15 ` Jorge A. Alfaro-Murillo
[not found] ` <mailman.1461.1429802140.904.help-gnu-emacs@gnu.org>
2015-04-23 15:43 ` Emanuel Berg
2015-04-23 18:11 ` Jorge A. Alfaro-Murillo
[not found] ` <mailman.1474.1429812715.904.help-gnu-emacs@gnu.org>
2015-04-23 22:46 ` Emanuel Berg
2015-04-24 14:13 ` tomas
2015-04-24 14:41 ` Eli Zaretskii
2015-04-24 14:57 ` Jorge A. Alfaro-Murillo
2015-04-24 16:48 ` Eli Zaretskii
2015-04-24 20:18 ` Jorge A. Alfaro-Murillo
[not found] ` <mailman.1562.1429906736.904.help-gnu-emacs@gnu.org>
2015-04-25 1:11 ` Dan Espen
2015-04-26 2:38 ` Jorge A. Alfaro-Murillo
2015-04-26 14:48 ` Eli Zaretskii
2015-04-26 15:52 ` tomas
2015-04-26 16:05 ` Eli Zaretskii
2015-04-27 0:36 ` Stefan Monnier
2015-04-28 17:27 ` Alexander Shukaev
2015-04-28 17:30 ` Eli Zaretskii
2015-04-28 17:32 ` Alexander Shukaev
2015-04-28 17:55 ` Eli Zaretskii
2015-04-29 0:53 ` Stefan Monnier
[not found] ` <mailman.1824.1430242034.904.help-gnu-emacs@gnu.org>
2015-04-28 17:58 ` Emanuel Berg
2015-04-29 0:55 ` Stefan Monnier
2015-05-01 4:49 ` Alexander Shukaev
2015-05-01 4:54 ` Alexander Shukaev
2015-05-06 10:31 ` Alexander Shukaev
2015-05-06 12:49 ` Stefan Monnier
2015-05-12 11:34 ` Alexander Shukaev [this message]
2015-05-14 19:44 ` Stefan Monnier
2015-06-25 19:18 ` Alexander Shukaev
[not found] ` <mailman.2858.1431430470.904.help-gnu-emacs@gnu.org>
2015-05-12 17:24 ` Emanuel Berg
[not found] ` <mailman.1537.1429888188.904.help-gnu-emacs@gnu.org>
2015-04-25 1:16 ` Emanuel Berg
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=CAKu-7WzBGGiJqoT7AQ4NYzUuZp6gfeNvYawfggSBfbP7S1ak9Q@mail.gmail.com \
--to=haroogan@gmail.com \
--cc=help-gnu-emacs@gnu.org \
--cc=monnier@iro.umontreal.ca \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.