From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/59986 Path: news.gmane.org!not-for-mail From: Reiner Steib Newsgroups: gmane.emacs.gnus.general Subject: Re: Problem with gnus-group-mark-group Date: Fri, 11 Mar 2005 20:22:09 +0100 Message-ID: References: Reply-To: Reiner Steib NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1110570687 18085 80.91.229.2 (11 Mar 2005 19:51:27 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Fri, 11 Mar 2005 19:51:27 +0000 (UTC) Original-X-From: ding-owner+M8528@lists.math.uh.edu Fri Mar 11 20:51:26 2005 Original-Received: from malifon.math.uh.edu ([129.7.128.13] ident=mail) by ciao.gmane.org with esmtp (Exim 4.43) id 1D9q6B-0001Ap-Gj for ding-account@gmane.org; Fri, 11 Mar 2005 20:47:03 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.math.uh.edu ident=lists) by malifon.math.uh.edu with smtp (Exim 3.20 #1) id 1D9q1A-0007o2-00; Fri, 11 Mar 2005 13:41:52 -0600 Original-Received: from util2.math.uh.edu ([129.7.128.23]) by malifon.math.uh.edu with esmtp (Exim 3.20 #1) id 1D9q12-0007nw-00 for ding@lists.math.uh.edu; Fri, 11 Mar 2005 13:41:44 -0600 Original-Received: from quimby.gnus.org ([80.91.224.244]) by util2.math.uh.edu with esmtp (Exim 4.30) id 1D9q11-0007s6-8i for ding@lists.math.uh.edu; Fri, 11 Mar 2005 13:41:43 -0600 Original-Received: from main.gmane.org ([80.91.229.2] helo=ciao.gmane.org) by quimby.gnus.org with esmtp (Exim 3.35 #1 (Debian)) id 1D9q0z-0008JT-00 for ; Fri, 11 Mar 2005 20:41:41 +0100 Original-Received: from list by ciao.gmane.org with local (Exim 4.43) id 1D9pw1-00087O-S6 for ding@gnus.org; Fri, 11 Mar 2005 20:36:34 +0100 Original-Received: from dialin-145-254-249-190.arcor-ip.net ([145.254.249.190]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Fri, 11 Mar 2005 20:36:33 +0100 Original-Received: from Reiner.Steib by dialin-145-254-249-190.arcor-ip.net with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Fri, 11 Mar 2005 20:36:33 +0100 X-Injected-Via-Gmane: http://gmane.org/ Mail-Followup-To: ding@gnus.org Original-To: ding@gnus.org Original-Lines: 61 Original-X-Complaints-To: usenet@sea.gmane.org X-Gmane-NNTP-Posting-Host: dialin-145-254-249-190.arcor-ip.net X-Face: P05mdcZT&lL[-s2=mw~RsllZ0zZAb?vdE}.s XEmacs 21.4 (patch 17) "Jumbo Shrimp" [Lucid] (i686-pc-linux, Mule) > No Gnus v0.3 > > I recently switched form Gnus 5.10.6 to No Gnus 0.3 and encountered a problem > when hitting M-g in a summary buffer (gnus-summary-rescan-group) or the > group buffer (gnus-group-get-new-news-this-group). > > Each M-g produces an additional group entry in the group buffer leaving the > existing one(s) borked ("no group on current line" when trying to enter). > > I was able to identify gnus-group-mark-group as responsible for the faulty > behavior. The function changed significantly since 5.10.6 and replacing No > Gnus' gnus-group-mark-group with the v5.10.6 version apparently fixed the > problem. The only relevant change in `gnus-group-mark-group' is this one (AFAICS): --8<---------------cut here---------------start------------->8--- --- gnus-group.el 5 Jan 2004 16:30:15 -0000 7.4 +++ gnus-group.el 8 Jan 2004 16:33:41 -0000 7.5 @@ -1689,15 +1689,14 @@ ;; Go to the mark position. (beginning-of-line) (forward-char (or (cdr (assq 'process gnus-group-mark-positions)) 2)) - (subst-char-in-region - (point) (1+ (point)) (char-after) - (if unmark - (progn - (setq gnus-group-marked (delete group gnus-group-marked)) - ? ) + (delete-char 1) + (if unmark + (progn + (setq gnus-group-marked (delete group gnus-group-marked)) + (insert-char ? 1 t)) (setq gnus-group-marked (cons group (delete group gnus-group-marked))) - gnus-process-mark))) + (insert-char gnus-process-mark 1 t))) (unless no-advance (gnus-group-next-group 1)) (decf n)) --8<---------------cut here---------------end--------------->8--- Maybe there is some incompatibility with XEmacs in this change? Ideas anyone? Could you try to edebug the function `gnus-group-mark-group'? Go to the function definition and do `M-x edebug-defun RET'. When the function is called you can step through it with SPC and hopefully see where the problem is. Cancel the debug mode by re-evaluation the function with `M-x eval-defun RET'. Bye, Reiner. -- ,,, (o o) ---ooO-(_)-Ooo--- | PGP key available | http://rsteib.home.pages.de/