From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/5735
Path: main.gmane.org!not-for-mail
From: Kai Grossjohann <grossjoh@dusty.informatik.uni-dortmund.de>
Newsgroups: gmane.emacs.gnus.general
Subject: message.el and Supercite
Date: 27 Mar 1996 13:43:40 +0100
Message-ID: <vafd95y905f.fsf@dusty>
NNTP-Posting-Host: coloc-standby.netfonds.no
Mime-Version: 1.0 (generated by tm-edit 7.41)
Content-Type: text/plain; charset=US-ASCII
X-Trace: main.gmane.org 1035146297 1247 80.91.224.250 (20 Oct 2002 20:38:17 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Sun, 20 Oct 2002 20:38:17 +0000 (UTC)
Return-Path: ding-request@ifi.uio.no
Original-Received: from ifi.uio.no (ifi.uio.no [129.240.64.2]) by deanna.miranova.com (8.7.3/8.6.9) with SMTP id FAA01913 for <steve@miranova.com>; Wed, 27 Mar 1996 05:29:07 -0800
Original-Received: from floyd.informatik.uni-dortmund.de (floyd.informatik.uni-dortmund.de [129.217.4.40]) by ifi.uio.no with ESMTP (8.6.11/ifi2.4) 
	id <NAA22768@ifi.uio.no> for <ding@ifi.uio.no> ; Wed, 27 Mar 1996 13:43:48 +0100
Original-Received: by dusty.informatik.uni-dortmund.de id AA14744; Wed, 27 Mar 96 13:43:41 +0100
Original-To: ding@ifi.uio.no
Original-Lines: 38
X-Mailer: September Gnus v0.59/Emacs 19.30
Xref: main.gmane.org gmane.emacs.gnus.general:5735
X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:5735


Hi all,

the following suffices to get Supercite running:

*** message.el.orig	Wed Mar 27 07:03:01 1996
--- message.el	Wed Mar 27 13:35:28 1996
***************
*** 842,848 ****
        (unless (bolp)
  	(insert ?\n))
        (unless modified
! 	(setq message-checksum (message-checksum))))))
  
  (defun message-insert-citation-line ()
    "Function that inserts a simple citation line."
--- 842,849 ----
        (unless (bolp)
  	(insert ?\n))
        (unless modified
! 	(setq message-checksum (message-checksum)))
!       (run-hooks 'message-cite-hook))))
  
  (defun message-insert-citation-line ()
    "Function that inserts a simple citation line."


In my .emacs file I have this:

(setq message-indent-citation-function nil)
(setq message-citation-line-function nil)
(add-hook 'message-cite-hook 'sc-cite-original)

Lars, are you going to put this into the distribution?

        kai
--
There ain't no cure for the summer time blues.