all messages for Emacs-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
From: Stefan Monnier <monnier@iro.umontreal.ca>
Cc: emacs-devel <emacs-devel@gnu.org>
Subject: Re: use of symbolic display elements in ruler-mode
Date: 18 Mar 2004 09:27:14 -0500	[thread overview]
Message-ID: <jwv65d2utao.fsf-monnier+emacs@asado.iro.umontreal.ca> (raw)
In-Reply-To: <6592006.1079615674954.JavaMail.www@wwinf0802>

>  (defvar ruler-mode-ruler-function nil
> -  "If non-nil, function to call to return ruler string.
> +  "If non-nil, function to call to return ruler header line format.
>  This variable is expected to be made buffer-local by modes.")
>  (defconst ruler-mode-header-line-format
> -  '(:eval (funcall (if ruler-mode-ruler-function
> -		       ruler-mode-ruler-function
> -		     'ruler-mode-ruler)))
> +  '(:eval (funcall (or ruler-mode-ruler-function 'ruler-mode-ruler)))
>    "`header-line-format' used in ruler mode.
> -If the non-nil value for ruler-mode-ruler-function is given, use it.
> -Else use `ruler-mode-ruler' is used as default value.")
> +If `ruler-mode-ruler-function' is non-nil, call it to compute the
> +ruler value, else use `ruler-mode-ruler'.")

Why not just:

(defvar ruler-mode-ruler-function 'ruler-mode-ruler
  "Function to call to return ruler string.")
(defconst ruler-mode-header-line-format
  '(:eval (funcall ruler-mode-ruler-function))
   "`header-line-format' used in ruler mode.")


-- Stefan

  reply	other threads:[~2004-03-18 14:27 UTC|newest]

Thread overview: 7+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2004-03-18 13:14 use of symbolic display elements in ruler-mode David PONCE
2004-03-18 14:27 ` Stefan Monnier [this message]
  -- strict thread matches above, loose matches on Subject: below --
2004-03-18 14:52 David PONCE
2004-03-19  1:50 ` Kim F. Storm
2004-03-19  9:51 David PONCE
2004-03-19 14:20 ` Kim F. Storm
2004-03-19 13:45 David PONCE

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=jwv65d2utao.fsf-monnier+emacs@asado.iro.umontreal.ca \
    --to=monnier@iro.umontreal.ca \
    --cc=emacs-devel@gnu.org \
    /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.