From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/32627
Path: main.gmane.org!not-for-mail
From: dme@thus.net
Newsgroups: gmane.emacs.gnus.general
Subject: message-newline-and-reformat with odd citation characters
Date: 29 Sep 2000 09:27:01 +0100
Sender: owner-ding@hpc.uh.edu
Message-ID: <87d7hnfvsa.fsf@serafina-pekkala.dme.org>
NNTP-Posting-Host: coloc-standby.netfonds.no
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
X-Trace: main.gmane.org 1035168881 20876 80.91.224.250 (21 Oct 2002 02:54:41 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Mon, 21 Oct 2002 02:54:41 +0000 (UTC)
Return-Path: <owner-ding@hpc.uh.edu>
Original-Received: from fisher.math.uh.edu (fisher.math.uh.edu [129.7.128.35])
	by mailhost.sclp.com (Postfix) with ESMTP id EA151D051E
	for <jason@mailhost.sclp.com>; Fri, 29 Sep 2000 04:28:26 -0400 (EDT)
Original-Received: from sina.hpc.uh.edu (lists@Sina.HPC.UH.EDU [129.7.3.5])
	by fisher.math.uh.edu (8.9.1/8.9.1) with ESMTP id DAC02788;
	Fri, 29 Sep 2000 03:28:04 -0500 (CDT)
Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Fri, 29 Sep 2000 03:26:46 -0500 (CDT)
Original-Received: from mailhost.sclp.com (postfix@66-209.196.61.interliant.com [209.196.61.66] (may be forged))
	by sina.hpc.uh.edu (8.9.3/8.9.3) with ESMTP id DAA29237
	for <ding@hpc.uh.edu>; Fri, 29 Sep 2000 03:26:37 -0500 (CDT)
Original-Received: from serafina-pekkala.dme.org (something.dme.org [212.240.232.120])
	by mailhost.sclp.com (Postfix) with ESMTP id 2B14CD051E
	for <ding@gnus.org>; Fri, 29 Sep 2000 04:27:01 -0400 (EDT)
Original-Received: (from dme@localhost)
	by serafina-pekkala.dme.org (8.11.0/8.11.0) id e8T8R2815506;
	Fri, 29 Sep 2000 09:27:02 +0100 (BST)
Original-To: ding@gnus.org
Original-Lines: 36
User-Agent: Gnus/5.0808 (Gnus v5.8.8) XEmacs/21.1 (Canyonlands)
Precedence: list
X-Majordomo: 1.94.jlt7
Xref: main.gmane.org gmane.emacs.gnus.general:32627
X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:32627

If one uses a citation character which is not `>',
message-newline-and-reformat doesn't insert the correct citation
leader in situations where it breaks lines.

This patch corrects that.

As usual, sorry if my lisp is poor.

Index: message.el
===================================================================
RCS file: /usr/local/cvsroot/gnus/lisp/message.el,v
retrieving revision 5.130
diff -c -r5.130 message.el
*** message.el	2000/09/20 20:52:34	5.130
--- message.el	2000/09/29 07:28:49
***************
*** 1694,1700 ****
      (unless (bolp)
        (save-excursion
  	(beginning-of-line)
! 	(when (looking-at (concat prefix
  				  supercite-thing))
  	  (setq quoted (match-string 0))))
        (insert "\n"))
--- 1694,1700 ----
      (unless (bolp)
        (save-excursion
  	(beginning-of-line)
! 	(when (looking-at (concat prefix "\\|"
  				  supercite-thing))
  	  (setq quoted (match-string 0))))
        (insert "\n"))

dme.
-- 
David Edmondson, Director of Development, Thus plc.