From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: =?UTF-8?Q?=E5=B0=8F=E6=B1=9F=E6=B2=88?= Newsgroups: gmane.emacs.bugs Subject: bug#9261: `let' behavior is strange Date: Mon, 8 Aug 2011 15:49:04 +0800 Message-ID: NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: multipart/alternative; boundary=90e6ba212173a4dad704a9f9ae65 X-Trace: dough.gmane.org 1312818369 28934 80.91.229.12 (8 Aug 2011 15:46:09 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Mon, 8 Aug 2011 15:46:09 +0000 (UTC) To: 9261@debbugs.gnu.org Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Mon Aug 08 17:46:04 2011 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([140.186.70.17]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1QqS1k-000822-FC for geb-bug-gnu-emacs@m.gmane.org; Mon, 08 Aug 2011 17:46:04 +0200 Original-Received: from localhost ([::1]:34467 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1QqS1k-0000Mg-15 for geb-bug-gnu-emacs@m.gmane.org; Mon, 08 Aug 2011 11:46:04 -0400 Original-Received: from eggs.gnu.org ([140.186.70.92]:33995) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1QqS0j-0008In-UK for bug-gnu-emacs@gnu.org; Mon, 08 Aug 2011 11:45:03 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1QqS0i-00086N-Jj for bug-gnu-emacs@gnu.org; Mon, 08 Aug 2011 11:45:01 -0400 Original-Received: from debbugs.gnu.org ([140.186.70.43]:42931) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1QqS0i-00086I-Ht for bug-gnu-emacs@gnu.org; Mon, 08 Aug 2011 11:45:00 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.69) (envelope-from ) id 1QqS1i-0006Vz-AP; Mon, 08 Aug 2011 11:46:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: =?UTF-8?Q?=E5=B0=8F=E6=B1=9F=E6=B2=88?= Original-Sender: debbugs-submit-bounces@debbugs.gnu.org Resent-To: owner@debbugs.gnu.org Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Mon, 08 Aug 2011 15:46:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 9261 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: X-Debbugs-Original-To: bug-gnu-emacs@gnu.org Original-Received: via spool by submit@debbugs.gnu.org id=B.131281831124978 (code B ref -1); Mon, 08 Aug 2011 15:46:02 +0000 Original-Received: (at submit) by debbugs.gnu.org; 8 Aug 2011 15:45:11 +0000 Original-Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1QqS0r-0006Un-OF for submit@debbugs.gnu.org; Mon, 08 Aug 2011 11:45:11 -0400 Original-Received: from eggs.gnu.org ([140.186.70.92]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1QqKbH-0002yh-Oj for submit@debbugs.gnu.org; Mon, 08 Aug 2011 03:50:16 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1QqKaH-0003Fo-It for submit@debbugs.gnu.org; Mon, 08 Aug 2011 03:49:14 -0400 Original-Received: from lists.gnu.org ([140.186.70.17]:52046) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1QqKaH-0003Fk-HO for submit@debbugs.gnu.org; Mon, 08 Aug 2011 03:49:13 -0400 Original-Received: from eggs.gnu.org ([140.186.70.92]:53593) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1QqKaG-0006k9-9j for bug-gnu-emacs@gnu.org; Mon, 08 Aug 2011 03:49:13 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1QqKaE-0003FW-MC for bug-gnu-emacs@gnu.org; Mon, 08 Aug 2011 03:49:12 -0400 Original-Received: from mail-iy0-f175.google.com ([209.85.210.175]:48647) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1QqKaE-0003FQ-Ha for bug-gnu-emacs@gnu.org; Mon, 08 Aug 2011 03:49:10 -0400 Original-Received: by iyn15 with SMTP id 15so6455860iyn.6 for ; Mon, 08 Aug 2011 00:49:08 -0700 (PDT) Original-Received: by 10.42.131.71 with SMTP id y7mr5398911ics.315.1312789748832; Mon, 08 Aug 2011 00:49:08 -0700 (PDT) Original-Received: by 10.42.170.197 with HTTP; Mon, 8 Aug 2011 00:49:04 -0700 (PDT) X-Originating-IP: [114.217.231.129] X-Google-Sender-Auth: 3AKMhasQsbnZ5vrM-tdi_YBxf5s X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 2) X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 3) X-Mailman-Approved-At: Mon, 08 Aug 2011 11:45:08 -0400 X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.11 Precedence: list Resent-Date: Mon, 08 Aug 2011 11:46:02 -0400 X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 1) X-Received-From: 140.186.70.43 X-Mailman-Approved-At: Mon, 08 Aug 2011 11:46:01 -0400 X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.bugs:49950 Archived-At: --90e6ba212173a4dad704a9f9ae65 Content-Type: text/plain; charset=UTF-8 (progn (put 'defun 'x "out") (let ((old (plist-member (symbol-plist 'defun) 'x))) (message "old: %s." old) (put 'defun 'x "in") (message "old: %s." old) nil)) When I eval this form, I get something like this in *message* buffer: old: (x out). old: (x in). nil I thought it should be: old: (x out). old: (x out). nil If it is not a bug, how can I save the prev symbol property? Thank you. In GNU Emacs 23.3.1 (x86_64-pc-linux-gnu, GTK+ Version 2.24.4) of 2011-04-11 on brahms, modified by Debian Windowing system distributor `The X.Org Foundation', version 11.0.11002000 configured using `configure '--build' 'x86_64-linux-gnu' '--build' 'x86_64-linux-gnu' '--prefix=/usr' '--sharedstatedir=/var/lib' '--libexecdir=/usr/lib' '--localstatedir=/var/lib' '--infodir=/usr/share/info' '--mandir=/usr/share/man' '--with-pop=yes' '--enable-locallisppath=/etc/emacs23:/etc/emacs:/usr/local/share/emacs/23.3/site-lisp:/usr/local/share/emacs/site-lisp:/usr/share/emacs/23.3/site-lisp:/usr/share/emacs/site-lisp:/usr/share/emacs/23.3/leim' '--with-x=yes' '--with-x-toolkit=gtk' '--with-toolkit-scroll-bars' 'build_alias=x86_64-linux-gnu' 'CFLAGS=-DDEBIAN -g -O2' 'LDFLAGS=-g' 'CPPFLAGS='' Important settings: value of $LC_ALL: nil value of $LC_COLLATE: nil value of $LC_CTYPE: nil value of $LC_MESSAGES: nil value of $LC_MONETARY: nil value of $LC_NUMERIC: nil value of $LC_TIME: nil value of $LANG: en_US.utf8 value of $XMODIFIERS: @im=ibus locale-coding-system: utf-8-unix default enable-multibyte-characters: t Major mode: Lisp Interaction Minor modes in effect: tooltip-mode: t mouse-wheel-mode: t tool-bar-mode: t menu-bar-mode: t file-name-shadow-mode: t global-font-lock-mode: t font-lock-mode: t blink-cursor-mode: t auto-encryption-mode: t auto-compression-mode: t line-number-mode: t transient-mark-mode: t Recent input: M-x r e p o r Recent messages: For information about GNU Emacs and the GNU system, type C-h C-a. Making completion list... Load-path shadows: /usr/share/emacs/23.3/site-lisp/debian-startup hides /usr/share/emacs/site-lisp/debian-startup /usr/share/emacs/23.3/site-lisp/dictionaries-common/flyspell hides /usr/share/emacs/23.3/lisp/textmodes/flyspell /usr/share/emacs/23.3/site-lisp/dictionaries-common/ispell hides /usr/share/emacs/23.3/lisp/textmodes/ispell Features: (shadow sort mail-extr message sendmail regexp-opt ecomplete rfc822 mml mml-sec password-cache mm-decode mm-bodies mm-encode mailcap mail-parse rfc2231 rfc2047 rfc2045 qp ietf-drums mailabbrev nnheader gnus-util netrc time-date mm-util mail-prsvr gmm-utils wid-edit mailheader canlock sha1 hex-util hashcash mail-utils emacsbug help-mode easymenu view tooltip ediff-hook vc-hooks lisp-float-type mwheel x-win x-dnd font-setting tool-bar dnd fontset image fringe lisp-mode register page menu-bar rfn-eshadow timer select scroll-bar mldrag mouse jit-lock font-lock syntax facemenu font-core frame cham georgian utf-8-lang misc-lang vietnamese tibetan thai tai-viet lao korean japanese hebrew greek romanian slovak czech european ethiopic indian cyrillic chinese case-table epa-hook jka-cmpr-hook help simple abbrev loaddefs button minibuffer faces cus-face files text-properties overlay md5 base64 format env code-pages mule custom widget hashtable-print-readable backquote make-network-process dbusbind system-font-setting font-render-setting gtk x-toolkit x multi-tty emacs) --90e6ba212173a4dad704a9f9ae65 Content-Type: text/html; charset=UTF-8 Content-Transfer-Encoding: quoted-printable
(progn (put 'defun 'x "out")
=C2=A0 =C2=A0= =C2=A0 =C2=A0(let ((old (plist-member (symbol-plist 'defun) 'x)))<= /div>
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0(message "old: %s." o= ld)
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0(put 'defun 'x &quo= t;in")
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0(message "old: %s." old)
=C2=A0 =C2=A0 =C2=A0 =C2=A0 =C2=A0nil))

W= hen I eval this form, I get something like this in *message* buffer:
<= div>old: (x out).
old: (x in).
nil

I thought it should be:
old: (x= out).
old: (x out).
nil

If it= is not a bug, how can I save the prev symbol property?

Thank you.



In G= NU Emacs 23.3.1 (x86_64-pc-linux-gnu, GTK+ Version 2.24.4)
=C2=A0= of 2011-04-11 on brahms, modified by Debian
Windowing system dist= ributor `The X.Org Foundation', version 11.0.11002000
configured using `configure =C2=A0'--build' 'x86_64-linux-= gnu' '--build' 'x86_64-linux-gnu' '--prefix=3D/usr&= #39; '--sharedstatedir=3D/var/lib' '--libexecdir=3D/usr/lib'= ; '--localstatedir=3D/var/lib' '--infodir=3D/usr/share/info'= ; '--mandir=3D/usr/share/man' '--with-pop=3Dyes' '--ena= ble-locallisppath=3D/etc/emacs23:/etc/emacs:/usr/local/share/emacs/23.3/sit= e-lisp:/usr/local/share/emacs/site-lisp:/usr/share/emacs/23.3/site-lisp:/us= r/share/emacs/site-lisp:/usr/share/emacs/23.3/leim' '--with-x=3Dyes= ' '--with-x-toolkit=3Dgtk' '--with-toolkit-scroll-bars'= 'build_alias=3Dx86_64-linux-gnu' 'CFLAGS=3D-DDEBIAN -g -O2'= ; 'LDFLAGS=3D-g' 'CPPFLAGS=3D''

Important settings:
=C2=A0 value of $LC_ALL: = nil
=C2=A0 value of $LC_COLLATE: nil
=C2=A0 value of $L= C_CTYPE: nil
=C2=A0 value of $LC_MESSAGES: nil
=C2=A0 v= alue of $LC_MONETARY: nil
=C2=A0 value of $LC_NUMERIC: nil
=C2=A0 value of $LC_TIME: n= il
=C2=A0 value of $LANG: en_US.utf8
=C2=A0 value of $X= MODIFIERS: @im=3Dibus
=C2=A0 locale-coding-system: utf-8-unix
=C2=A0 default enable-multibyte-characters: t

Major mode: Lisp Interaction

M= inor modes in effect:
=C2=A0 tooltip-mode: t
=C2=A0 mou= se-wheel-mode: t
=C2=A0 tool-bar-mode: t
=C2=A0 menu-ba= r-mode: t
=C2=A0 file-name-shadow-mode: t
=C2=A0 global-font-lock-mode: t
=C2=A0 font-lock-mode: t
=C2=A0 blink-cursor-mode: t
=C2=A0 auto-encryption-mode: t
=C2=A0 auto-compression-mod= e: t
=C2=A0 line-number-mode: t
=C2=A0 transient-mark-mode: t

Recent input:
M-x r e p o <tab> r <tab> <return>
Recent messages:
For information about GNU Emacs and = the GNU system, type C-h C-a.
Making completion list...

Load-path shadows:<= /div>
/usr/share/emacs/23.3/site-lisp/debian-startup hides /usr/share/e= macs/site-lisp/debian-startup
/usr/share/emacs/23.3/site-lisp/dic= tionaries-common/flyspell hides /usr/share/emacs/23.3/lisp/textmodes/flyspe= ll
/usr/share/emacs/23.3/site-lisp/dictionaries-common/ispell hides /usr/= share/emacs/23.3/lisp/textmodes/ispell

Features:
(shadow sort mail-extr message sendmail regexp-opt ecomplete rfc82= 2 mml
mml-sec password-cache mm-decode mm-bodies mm-encode mailcap mail-pars= e
rfc2231 rfc2047 rfc2045 qp ietf-drums mailabbrev nnheader gnus-= util
netrc time-date mm-util mail-prsvr gmm-utils wid-edit mailhe= ader canlock
sha1 hex-util hashcash mail-utils emacsbug help-mode easymenu view
tooltip ediff-hook vc-hooks lisp-float-type mwheel x-win x-dnd
=
font-setting tool-bar dnd fontset image fringe lisp-mode register page=
menu-bar rfn-eshadow timer select scroll-bar mldrag mouse jit-lock
font-lock syntax facemenu font-core frame cham georgian utf-8-lang
misc-lang vietnamese tibetan thai tai-viet lao korean japanese heb= rew
greek romanian slovak czech european ethiopic indian cyrillic chinese<= /div>
case-table epa-hook jka-cmpr-hook help simple abbrev loaddefs but= ton
minibuffer faces cus-face files text-properties overlay md5 b= ase64
format env code-pages mule custom widget hashtable-print-readable
backquote make-network-process dbusbind system-font-setting
font-render-setting gtk x-toolkit x multi-tty emacs)

--90e6ba212173a4dad704a9f9ae65--