From: Le Wang <l26wang@gmail.com>
To: Lars Magne Ingebrigtsen <larsi@gnus.org>
Cc: Andreas Schwab <schwab@linux-m68k.org>, 9469@debbugs.gnu.org
Subject: bug#9469: buffer-local variables seem to remember previous values
Date: Mon, 12 Sep 2011 03:18:39 +0800 [thread overview]
Message-ID: <CAM=K+ipPkBNtG2URDpitbjNOnR7UN2kZvviDN+jbtnayw5q=vQ@mail.gmail.com> (raw)
In-Reply-To: <m31uvm9agj.fsf@stories.gnus.org>
On Mon, Sep 12, 2011 at 2:54 AM, Lars Magne Ingebrigtsen <larsi@gnus.org> wrote:
> If I read your code correctly, Andreas is correct and precise as usual,
> if a bit terse. :-)
Ok, that was my fault. I didn't know how to make heads or tails of
the situation, so included some red herrings in my original snippet.
This should clarify my exact point of confusion:
(setq foo-alist nil)
;; => nil
(defun reset-var-in-foo-alist ()
(push '(:var . 0) foo-alist))
;; => reset-var-in-foo-alist
(defun increment-var-in-foo-alist ()
(let ((var-cons (assq :var foo-alist)))
(setcdr var-cons (1+ (cdr var-cons)))))
;; => increment-var-in-foo-alist
(reset-var-in-foo-alist)
;; => ((:var . 0))
(increment-var-in-foo-alist)
;; => 1
(reset-var-in-foo-alist)
;; => ((:var . 1) (:var . 1))
Again, my misunderstanding was that in `reset-var-in-foo-alist' quote
does not cons, I assumed it did.
--
Le
next prev parent reply other threads:[~2011-09-11 19:18 UTC|newest]
Thread overview: 24+ messages / expand[flat|nested] mbox.gz Atom feed top
2011-09-10 17:07 bug#9469: buffer-local variables seem to remember previous values Le Wang
2011-09-10 17:44 ` Drew Adams
2011-09-11 16:57 ` Le Wang
2011-09-11 17:56 ` Drew Adams
2011-09-11 18:08 ` Andreas Schwab
2011-09-11 18:49 ` Le Wang
2011-09-11 18:54 ` Lars Magne Ingebrigtsen
2011-09-11 19:18 ` Le Wang [this message]
2011-09-11 19:54 ` Lars Magne Ingebrigtsen
2011-09-12 4:39 ` Le Wang
2011-09-12 7:57 ` Andreas Schwab
2011-09-12 8:23 ` Le Wang
2011-09-12 8:35 ` Andreas Schwab
2011-09-12 14:30 ` Drew Adams
2011-09-12 15:06 ` Le Wang
2011-09-13 12:54 ` Stefan Monnier
2011-09-13 13:12 ` Le Wang
2011-09-13 15:00 ` Helmut Eller
2011-09-13 18:02 ` Johan Bockgård
2011-09-13 18:52 ` Drew Adams
2011-09-13 20:42 ` Helmut Eller
2011-09-15 18:14 ` Le Wang
2011-09-11 19:37 ` Helmut Eller
2011-09-11 19:46 ` Andreas Schwab
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='CAM=K+ipPkBNtG2URDpitbjNOnR7UN2kZvviDN+jbtnayw5q=vQ@mail.gmail.com' \
--to=l26wang@gmail.com \
--cc=9469@debbugs.gnu.org \
--cc=larsi@gnus.org \
--cc=schwab@linux-m68k.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.