From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/63775 Path: news.gmane.org!not-for-mail From: Max Froumentin Newsgroups: gmane.emacs.gnus.general Subject: Re: security buttons without a face (3) Date: Wed, 27 Sep 2006 11:18:31 +0100 Organization: none Message-ID: References: <87odva7x6h.fsf@lapin-bleu.net> <87u050nul4.fsf@lapin-bleu.net> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-Trace: sea.gmane.org 1159352638 28848 80.91.229.2 (27 Sep 2006 10:23:58 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Wed, 27 Sep 2006 10:23:58 +0000 (UTC) Original-X-From: ding-owner+m12302@lists.math.uh.edu Wed Sep 27 12:23:51 2006 Return-path: Envelope-to: ding-account@gmane.org Original-Received: from malifon.math.uh.edu ([129.7.128.13]) by ciao.gmane.org with esmtp (Exim 4.43) id 1GSWZo-0005P0-66 for ding-account@gmane.org; Wed, 27 Sep 2006 12:23:40 +0200 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 1GSWZj-0001Ie-00; Wed, 27 Sep 2006 05:23:35 -0500 Original-Received: from mx1.math.uh.edu ([129.7.128.32]) by malifon.math.uh.edu with esmtp (Exim 3.20 #1) id 1GSWVH-0001IY-00 for ding@lists.math.uh.edu; Wed, 27 Sep 2006 05:18:59 -0500 Original-Received: from quimby.gnus.org ([80.91.227.211]) by mx1.math.uh.edu with esmtp (Exim 4.52) id 1GSWVF-0005LF-IK for ding@lists.math.uh.edu; Wed, 27 Sep 2006 05:18:59 -0500 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 1GSWV8-0000JK-00 for ; Wed, 27 Sep 2006 12:18:50 +0200 Original-Received: from list by ciao.gmane.org with local (Exim 4.43) id 1GSWV4-0004Kt-HS for ding@gnus.org; Wed, 27 Sep 2006 12:18:47 +0200 Original-Received: from dhcp-02.ilrt.bris.ac.uk ([137.222.34.202]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Wed, 27 Sep 2006 12:18:46 +0200 Original-Received: from max by dhcp-02.ilrt.bris.ac.uk with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Wed, 27 Sep 2006 12:18:46 +0200 X-Injected-Via-Gmane: http://gmane.org/ Original-To: ding@gnus.org Original-Lines: 88 Original-X-Complaints-To: usenet@sea.gmane.org X-Gmane-NNTP-Posting-Host: dhcp-02.ilrt.bris.ac.uk User-Agent: Gnus/5.110006 (No Gnus v0.6) Emacs/22.0.50 (darwin) Cancel-Lock: sha1:NaScuAHgyOEPLYiavdlKJ22e7Q8= X-Spam-Score: -2.6 (--) Precedence: bulk Original-Sender: ding-owner@lists.math.uh.edu Xref: news.gmane.org gmane.emacs.gnus.general:63775 Archived-At: --=-=-= Reiner Steib writes: > Could you please resend the patch including the diff headers? > Preferably using a unified (or at least context) diff format (-u or > -c). certainly: --=-=-= Content-Type: text/x-patch Content-Disposition: inline; filename=gnus-art.el.diff --- gnus-art.el 2006-09-26 14:43:50.000000000 +0100 +++ gnus-art.el.7.196 2006-09-26 14:53:16.000000000 +0100 @@ -7499,24 +7499,18 @@ (defun gnus-insert-prev-page-button () (let ((b (point)) - (e (point)) (inhibit-read-only t)) (gnus-eval-format gnus-prev-page-line-format nil `(keymap ,gnus-prev-page-map - gnus-prev t - gnus-callback gnus-article-button-prev-page - article-type annotation)) - (setq e - (if (bolp) - ;; Exclude a newline. - (1- (point)) - (point))) - (when gnus-article-button-face - (gnus-overlay-put (gnus-make-overlay b e) - 'face gnus-article-button-face)) + gnus-prev t + gnus-callback gnus-article-button-prev-page + article-type annotation)) (widget-convert-button - 'link b e + 'link b (if (bolp) + ;; Exclude a newline. + (1- (point)) + (point)) :action 'gnus-button-prev-page :button-keymap gnus-prev-page-map))) @@ -7538,23 +7532,17 @@ (defun gnus-insert-next-page-button () (let ((b (point)) - (e (point)) (inhibit-read-only t)) (gnus-eval-format gnus-next-page-line-format nil - `(keymap ,gnus-next-page-map - gnus-next t - gnus-callback gnus-article-button-next-page - article-type annotation)) - (setq e - (if (bolp) - ;; Exclude a newline. - (1- (point)) - (point))) - (when gnus-article-button-face - (gnus-overlay-put (gnus-make-overlay b e) - 'face gnus-article-button-face)) + `(keymap ,gnus-next-page-map + gnus-next t + gnus-callback gnus-article-button-next-page + article-type annotation)) (widget-convert-button - 'link b e + 'link b (if (bolp) + ;; Exclude a newline. + (1- (point)) + (point)) :action 'gnus-button-next-page :button-keymap gnus-next-page-map))) --=-=-= Max. --=-=-=--