From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/36782 Path: main.gmane.org!not-for-mail From: Didier Verna Newsgroups: gmane.emacs.gnus.general Subject: Re: Compilation error Date: Wed, 04 Jul 2001 15:34:37 +0200 Message-ID: References: NNTP-Posting-Host: coloc-standby.netfonds.no Mime-Version: 1.0 Content-Type: text/plain; charset=iso-8859-1 Content-Transfer-Encoding: quoted-printable X-Trace: main.gmane.org 1035172311 10422 80.91.224.250 (21 Oct 2002 03:51:51 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Mon, 21 Oct 2002 03:51:51 +0000 (UTC) Cc: ding@gnus.org Return-Path: Return-Path: Original-Received: (qmail 17807 invoked from network); 4 Jul 2001 13:29:14 -0000 Original-Received: from hermes.epita.fr (163.5.255.10) by gnus.org with SMTP; 4 Jul 2001 13:29:14 -0000 Original-Received: from goa.lrde.epita.fr (mail@goa.lrde.epita.fr [10.223.13.2]) by hermes.epita.fr id PAA21985 Wed, 4 Jul 2001 15:27:13 GMT Original-Received: from uzeb.lrde.epita.fr ([10.223.13.53] ident=mail) by goa.lrde.epita.fr with esmtp (Exim 3.22 #1 (Debian)) id 15HmpL-0001u5-00; Wed, 04 Jul 2001 15:36:23 +0200 Original-Received: from didier by uzeb.lrde.epita.fr with local (Exim 3.22 #1 (Debian)) id 15Hmne-0004OU-00; Wed, 04 Jul 2001 15:34:38 +0200 Original-To: stromme@mi.uib.no (Stein A. =?iso-8859-1?q?Str=F8mme?=) X-Attribution: drv X-Url: http://www.lrde.epita.fr/~didier X-Web: http://www.lrde.epita.fr/~didier X-Home-Page: http://www.lrde.epita.fr/~didier In-Reply-To: (stromme@mi.uib.no's message of "Wed, 04 Jul 2001 14:43:18 +0200") X-Face: |j}\)O|k##MrRz#VK$Jy=0r=3Qc,,a/Tr6*JQbE73dy17]2YcmW$9Z&H21e}#~#pgc>dn(is5Bv1l!{1re+Q9suKIOUmOqZs2>QMxHlR;;}kaGYA@HR3D C6 X-Face: 6o|eiKqaHN.ANh8HXDzntcWUOCg\]RsOd.ctvm~*y}Y^R&*a+Co,\s#=HWsw3x$b_n2kJ#g (7u?J^@^xP)f,jUF|0Z'J:|G/bMA5O12*b,7`-Q`=pKsCRIpso07.Y>YB2H{7`?u&yh;C_ZtLHfj I just updated my cvs gnus, and get this. Afterwards, gnus will not > even start. Ideas? I think this is due to my recent patch. Under XEmacs, the `point' function has an optional argument. Emacs appears not to have this. Please t= ry the following patch. If it works, I'll aply it immediately. Index: nntp.el =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D RCS file: /usr/local/cvsroot/gnus/lisp/nntp.el,v retrieving revision 6.9 diff -u -r6.9 nntp.el --- nntp.el 2001/07/04 10:04:40 6.9 +++ nntp.el 2001/07/04 13:28:32 @@ -382,7 +382,7 @@ (erase-buffer))) (let* ((command (mapconcat 'identity strings " ")) (buffer (process-buffer (nntp-find-connection nntp-server-buffer))) - (pos (point buffer))) + (pos (with-current-buffer buffer (point)))) (prog1 (nntp-retrieve-data command nntp-address nntp-port-number nntp-server-buffer @@ -402,7 +402,7 @@ "Send STRINGS to server and wait until WAIT-FOR returns." (let* ((command (mapconcat 'identity strings " ")) (buffer (process-buffer (nntp-find-connection nntp-server-buffer))) - (pos (point buffer))) + (pos (with-current-buffer buffer (point)))) (prog1 (nntp-retrieve-data command nntp-address nntp-port-number nntp-server-buffer @@ -427,7 +427,7 @@ (erase-buffer))) (let* ((command (mapconcat 'identity strings " ")) (buffer (process-buffer (nntp-find-connection nntp-server-buffer))) - (pos (point buffer))) + (pos (with-current-buffer buffer (point)))) (prog1 (nntp-retrieve-data command nntp-address nntp-port-number nntp-server-buffer --=20 Didier Verna, didier@lrde.epita.fr, http://www.lrde.epita.fr/~didier EPITA / LRDE, 14-16 rue Voltaire Tel.+33 (1) 53 14 59 47 94276 Le Kremlin-Bic=EAtre, France Fax.+33 (1) 44 08 01 99 didier@xemac= s.org