From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/80917 Path: news.gmane.org!not-for-mail From: Yagnesh Raghava Yakkala Newsgroups: gmane.emacs.gnus.general Subject: Re: Customize citation character Date: Thu, 19 Jan 2012 03:15:46 +0900 Message-ID: <8739bcri5p.fsf@live.com> References: <87wr8pohnv.fsf@nzebook.haselwarter.org> <87ty3tqxf7.fsf@marauder.physik.uni-ulm.de> <878vl4riz3.fsf@live.com> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain X-Trace: dough.gmane.org 1326910519 31138 80.91.229.12 (18 Jan 2012 18:15:19 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Wed, 18 Jan 2012 18:15:19 +0000 (UTC) To: ding@gnus.org Original-X-From: ding-owner+M29199@lists.math.uh.edu Wed Jan 18 19:15:15 2012 Return-path: Envelope-to: ding-account@gmane.org Original-Received: from util0.math.uh.edu ([129.7.128.18]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1Rna2R-0007G7-OG for ding-account@gmane.org; Wed, 18 Jan 2012 19:15:12 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.math.uh.edu) by util0.math.uh.edu with smtp (Exim 4.63) (envelope-from ) id 1Rna2A-0006Ep-Tc; Wed, 18 Jan 2012 12:14:54 -0600 Original-Received: from mx2.math.uh.edu ([129.7.128.33]) by util0.math.uh.edu with esmtps (TLSv1:AES256-SHA:256) (Exim 4.63) (envelope-from ) id 1Rna29-0006Eh-Bv for ding@lists.math.uh.edu; Wed, 18 Jan 2012 12:14:53 -0600 Original-Received: from quimby.gnus.org ([80.91.231.51]) by mx2.math.uh.edu with esmtps (TLSv1:AES256-SHA:256) (Exim 4.76) (envelope-from ) id 1Rna28-00012w-9V for ding@lists.math.uh.edu; Wed, 18 Jan 2012 12:14:53 -0600 Original-Received: from lo.gmane.org ([80.91.229.12]) by quimby.gnus.org with esmtp (Exim 4.72) (envelope-from ) id 1Rna26-0003lL-RU for ding@gnus.org; Wed, 18 Jan 2012 19:14:50 +0100 Original-Received: from list by lo.gmane.org with local (Exim 4.69) (envelope-from ) id 1Rna26-00072Y-8a for ding@gnus.org; Wed, 18 Jan 2012 19:14:50 +0100 Original-Received: from okhotsk19.lowtem.hokudai.ac.jp ([133.87.217.175]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Wed, 18 Jan 2012 19:14:50 +0100 Original-Received: from yagnesh by okhotsk19.lowtem.hokudai.ac.jp with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Wed, 18 Jan 2012 19:14:50 +0100 X-Injected-Via-Gmane: http://gmane.org/ Original-Lines: 33 Original-X-Complaints-To: usenet@dough.gmane.org X-Gmane-NNTP-Posting-Host: okhotsk19.lowtem.hokudai.ac.jp User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.0.92 (gnu/linux) Cancel-Lock: sha1:Ve9U8djVRtJuvOMNu7RsWdovsW0= X-Spam-Score: -4.9 (----) List-ID: Precedence: bulk Xref: news.gmane.org gmane.emacs.gnus.general:80917 Archived-At: Yagnesh Raghava Yakkala writes: > Modified version of Yamaoka-san snippet with Reiners' pointer > > (add-hook 'gnus-article-prepare-hook > (lambda nil > (let ((style " | ") > (inhibit-read-only t)) > (save-excursion > (goto-char (point-min)) > (while (re-search-forward "^[\t >]+" nil t) > (put-text-property > (match-beginning 0) (match-end 0) > 'display style)))))) > > can be further improved by calculating number of ">" in there and > placing that many "|" with different colors. oops. scratch that. blind copying of regex. (add-hook 'gnus-article-prepare-hook (lambda nil (let ((cite-look " |") (inhibit-read-only t)) (save-excursion (goto-char (point-min)) (while (re-search-forward "^[\t ]?>+" nil t) (put-text-property (match-beginning 0) (match-end 0) 'display cite-look)))))) did I get it correctly this time .?