Re: HOWTO for Supercite?

[spamtrap@koldfront.dk (Adam Sjøgren)]

On Thu, 22 May 2003 20:49:20 GMT, David Steuber wrote:

> I would like to setup Supercite to improve quoting of messages I am
> responding too (like excess line lengths and a couple spaces of
> indentation) without chopping URLs.  I know I need to put something
> in my .emacs file (which now has all of ilisp.emacs pasted in, lol).

I'm using this, to get - well, er - this above kind of quoting.

(The sc-header-on-author-wrote fun is not by me, I think I picked it
up in this newsgroup aeons ago...)

If I remember correctly it still has problems with non-7-bit chars in
peoples names, but I tend to forget about that as soon as I see it,
and never get around to try to find a remedy.

 ; SuperCite:
 (defun sc-header-on-author-wrote ()
   "\"On <date>, <author> wrote:\" unless:
 1. the \"author\" field cannot be found, in which case nothing is inserted;
 2. the \"date\" field is missing in which case only the from part is printed."
   (let ((sc-mumble "")
         (whofrom (sc-whofrom)))
     (if whofrom
         (insert sc-reference-tag-string
                 (sc-hdr "On " (sc-mail-field "date") ", ")
                 (sc-hdr "" (sc-mail-field "sc-author") " ")
                 "wrote:\n"))))

 (load-library "supercite")
 (add-hook 'mail-citation-hook 'sc-cite-original)
 (setq message-cite-function 'sc-cite-original)
 (setq news-reply-header-hook nil)
 ; Use the usual ">" citing:
 (setq sc-citation-leader "")
 (setq sc-nested-citation-p t)
 ; No >>>>>>> thingie:
 (setq sc-reference-tag-string "")
 ; "On bla, bla wrote:":
 (setq sc-rewrite-header-list
       '((sc-header-on-author-wrote)))
 (setq sc-preferred-header-style 0)
 ; Don't ask me!
 (setq sc-confirm-always-p nil)
 ; Do not fill automatically:
 (setq sc-auto-fill-region-p nil)

(Some of it may be unneccesary cruft from olden days :-))

The (setq sc-auto-fill-region-p nil) may not be what you want.

I think I tried trivial-cite once, but something made me go back to
SuperCite. I just can't remember what... (not of much use to know, I
know).


  Best regards,

-- 
 "Från och med nu, så är 'så snart                            Adam Sjøgren
  som möjligt' 53 timmar!"                               asjo@koldfront.dk