Re: multiple .signatures possible

[Jack Vinson <jvinson@cheux.ecs.umass.edu>]

>>>>> On 30 Apr 1996 10:23:31 +0200, Uwe Sigurd Valentin Kubosch
>>>>> <uwek@ifi.uio.no> said:

Uwe> I often write for different organizations and would like the
Uwe> .signature to replect this.  Sometimes I represent my University,
Uwe> and sometimes just myself, or my firm, or...

For multiple signature files, I advise the message-insert-signature
function to set message-signature-file to a random file from my signature
directory: (I have files that look like "sig1" "sig2" etc in that
directory.)

;; random insertion of .signature file
;; Thanks to Glenn R Coombs: glenn@prl.philips.co.uk
(defvar grc-signature-dir   "~/.sig/")
(defvar grc-signature-base  "sig")

(defadvice message-insert-signature (before random-mail-sig-ag act comp)
  "Change the value of message-signature-file each time 
`message-insert-signature' is called."
  (let ((files (file-name-all-completions
                grc-signature-base (expand-file-name grc-signature-dir))))
    (if files (let ((file (nth (random (length files)) files)))
		(setq message-signature-file (concat grc-signature-dir file))
		))))

-- 
Jack Vinson                       jvinson@cheux.ecs.umass.edu
Sunderland, MA                    <http://www.cis.upenn.edu/~vinson/home.html>
Q. "Is a cat's urinary tract health important?"  A. "Yes, very."
     - Purina Cat Chow Special Formula Commercial