From: Oliver Scholz <alkibiades@gmx.de>
Subject: Re: Style in elisp: how to show a flag value in the modeline?
Date: Thu, 20 Feb 2003 13:48:59 +0100 [thread overview]
Message-ID: <u8ywb3yo4.fsf@ID-87814.user.dfncis.de> (raw)
In-Reply-To: 87of579t70.fsf@noos.fr
francois.fleuret@noos.fr (François Fleuret) writes:
> Hi,
>
> What is the good way to show in the modeline the value of a boolean of
> a flag associated to a major-mode ? The current solution I came with
> is to change the value of `mode-name'. But I have the feeling that
> should be done another way. Any advice ?
Hmm, how about:
(defvar my-flag t)
(setq mode-line-format (copy-sequence mode-line-format))
(setcdr (nthcdr 4 mode-line-format)
(cons '(:eval (if my-flag " True" " False"))
(nthcdr 5 mode-line-format)))
It seems like an odd way to modify the mode-line, but I can't think of
any better right now.
Oliver
--
2 Ventôse an 211 de la Révolution
Liberté, Egalité, Fraternité!
next prev parent reply other threads:[~2003-02-20 12:48 UTC|newest]
Thread overview: 13+ messages / expand[flat|nested] mbox.gz Atom feed top
2003-02-20 9:50 Style in elisp: how to show a flag value in the modeline? François Fleuret
2003-02-20 11:46 ` Kai Großjohann
2003-02-20 12:45 ` François Fleuret
2003-02-20 17:26 ` Kai Großjohann
2003-02-20 17:26 ` Kai Großjohann
2003-02-21 8:57 ` François Fleuret
2003-02-21 17:54 ` Kai Großjohann
2003-02-21 18:07 ` François Fleuret
2003-02-21 20:41 ` Kai Großjohann
2003-02-21 21:18 ` François Fleuret
2003-02-21 21:59 ` Kai Großjohann
2003-02-20 12:48 ` Oliver Scholz [this message]
2003-02-20 20:45 ` Stefan Monnier <foo@acm.com>
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=u8ywb3yo4.fsf@ID-87814.user.dfncis.de \
--to=alkibiades@gmx.de \
/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.