From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/63266 Path: news.gmane.org!not-for-mail From: Katsumi Yamaoka Newsgroups: gmane.emacs.gnus.semi.japanese,gmane.emacs.gnus.general Subject: Re: gnus-agent-read-local Date: Mon, 29 May 2006 10:13:01 +0900 Organization: Emacsen advocacy group Message-ID: References: Reply-To: semi-gnus-ja@meadowy.org NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1148865206 26857 80.91.229.2 (29 May 2006 01:13:26 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Mon, 29 May 2006 01:13:26 +0000 (UTC) Cc: semi-gnus-ja@meadowy.org Original-X-From: semi-gnus-ja-return-19026-gegsj-semi-gnus-ja-403=m.gmane.org@meadowy.org Mon May 29 03:13:22 2006 Return-path: Envelope-to: gegsj-semi-gnus-ja-403@gmane.org Original-Received: from farm.meadowy.org ([202.222.30.108]) by ciao.gmane.org with smtp (Exim 4.43) id 1FkWJs-0008NA-E3 for gegsj-semi-gnus-ja-403@gmane.org; Mon, 29 May 2006 03:13:21 +0200 Original-Received: (qmail 25802 invoked by uid 501); 29 May 2006 01:13:15 -0000 Mailing-List: contact semi-gnus-ja-help@meadowy.org; run by ezmlm Original-Sender: semi-gnus-ja-owner@meadowy.org X-ML-NAME: semi-gnus-ja Precedence: bulk Original-Received: (qmail 25796 invoked from network); 29 May 2006 01:13:15 -0000 X-SendingHost: 66.225.201.13 Original-To: ding@gnus.org X-Hashcash: 1:20:060529:ding@gnus.org::K/56HFLQNVFLSBlM:00005OwS X-Hashcash: 1:20:060529:semi-gnus-ja@meadowy.org::870qGSzZYf6Zf76k:00000000000000000000000000000000000007Y6z X-Face: #kKnN,xUnmKia.'[pp`;Omh}odZK)?7wQSl"4o04=EixTF+V[""w~iNbM9ZL+.b*_CxUmFk B#Fu[*?MZZH@IkN:!"\w%I_zt>[$nm7nQosZ<3eu;B:$Q_:p!',P.c0-_Cy[dz4oIpw0ESA^D*1Lw= L&i*6&( User-Agent: Gnus/5.110006 (No Gnus v0.6) Emacs/22.0.50 (gnu/linux) Cancel-Lock: sha1:CTADY5M0am0JYOVodhcwrhkG9+g= X-AntiAbuse: This header was added to track abuse, please include it with any abuse report X-AntiAbuse: Primary Hostname - washington.hostforweb.net X-AntiAbuse: Original Domain - meadowy.org X-AntiAbuse: Originator/Caller UID/GID - [47 12] / [47 12] X-AntiAbuse: Sender Address Domain - jpl.org X-Source: X-Source-Args: X-Source-Dir: X-ML-COUNT: 19026 Xref: news.gmane.org gmane.emacs.gnus.semi.japanese:11622 gmane.emacs.gnus.general:63266 Archived-At: Hi, YAGI Tatsuya reported that there is a bug in the `gnus-agent-read-local' function. When it reads a "~/News/agent/BACKEND/SERVER/agent.lib/local" file, many group names listed in that file will be bound as global symbols. For instance, if the file contains the following entry, gnu\.emacs\.gnus 1234 5678 the variable `gnu\.emacs\.gnus' will be bound globally and set to the value `(1234 . 5678)'. As long as I understand, all such symbols should be in the private obarray. Actually, the code will do so if the first element of each entry is a string. However, it doesn't, since all they are now just symbols. Here's an extract of the `gnus-agent-read-local' function: --8<---------------cut here---------------start------------->8--- (setq group (read cur) min (read cur) max (read cur)) (when (stringp group) (setq group (intern group my-obarray))) ;; NOTE: The '+ 0' ensure that min and max are both numerics. (set group (cons (+ 0 min) (+ 0 max))) --8<---------------cut here---------------end--------------->8--- I think the middle part should be replaced with --8<---------------cut here---------------start------------->8--- (if (stringp group) (setq group (intern group my-obarray)) (setq group (intern (symbol-name group) my-obarray))) --8<---------------cut here---------------end--------------->8--- or simply with --8<---------------cut here---------------start------------->8--- (setq group (intern (symbol-name group) my-obarray)) --8<---------------cut here---------------end--------------->8--- However, I'm not sure the other functions work correctly assuming those variables are the ones in the private obarray, not global variables. Could anyone fix this properly? Regards,