[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: dolist?
From: |
Lennart Borgman |
Subject: |
Re: dolist? |
Date: |
Sat, 02 Jul 2005 22:09:33 +0200 |
User-agent: |
Mozilla Thunderbird 1.0.2 (Windows/20050317) |
Lennart Borgman wrote:
Here is a better example for testing. Please test this with the marked
message commented out and not commented out. Just put it in a buffer
and eval it.
Am I doing something seriously silly? Has someone checked this or
should I file a bug?
Got some time to make an even simpler test, see below:
(defconst assoc-list nil)
(setq assoc-list
'((description . "CEDET")
(install-function . "cedet-setup")))
(defvar callmsg nil)
(defun check-detail(consdet)
(when callmsg (message " *****")) ;; <---- works only if message is
called
(let ((detname (car consdet)))
(message (concat " ... checking detail \"" (symbol-name detname)
"\""))))
(message "\n-----------------------Single, NO marked message call:")
(setq callmsg nil)
(mapc 'check-detail assoc-list)
(message "\n-----------------------Single, WITH marked message call:")
(setq callmsg t)
(mapc 'check-detail assoc-list)
- dolist?, Lennart Borgman, 2005/07/02
- Re: dolist?, Lennart Borgman, 2005/07/02
- Re: dolist?,
Lennart Borgman <=
- Re: dolist?, David Ponce, 2005/07/02
- Re: dolist?, Miles Bader, 2005/07/02
- Re: dolist?, Juanma Barranquero, 2005/07/02
- Re: dolist?, Lennart Borgman, 2005/07/02
- Re: dolist?, David Ponce, 2005/07/02
- RE: dolist?, Drew Adams, 2005/07/02
- Re: dolist?, Miles Bader, 2005/07/02
- RE: dolist?, Drew Adams, 2005/07/02