From 23f9ecb863b9aa678452d3aa3c20e0ae35651437 Mon Sep 17 00:00:00 2001 From: morioka Date: Mon, 9 Mar 1998 20:06:24 +0000 Subject: [PATCH] tm 7.80. --- signature.el | 69 ++++++++++++++++++++++++++++------------------------------ 1 file changed, 33 insertions(+), 36 deletions(-) diff --git a/signature.el b/signature.el index a3850a7..b111892 100644 --- a/signature.el +++ b/signature.el @@ -1,41 +1,38 @@ -;;; ;;; signature.el --- a signature utility for GNU Emacs -;;; -;;; Copyright (C) 1995 Free Software Foundation, Inc. -;;; Copyright (C) 1994 .. 1996 MORIOKA Tomohiko -;;; Copyright (C) 1994 OKABE Yasuo -;;; Copyright (C) 1996 Artur Pioro -;;; Copyright (C) 1996 KOBAYASHI Shuhei -;;; -;;; Author: MORIOKA Tomohiko -;;; OKABE Yasuo -;;; Artur Pioro -;;; KOBAYASHI Shuhei -;;; Maintainer: KOBAYASHI Shuhei -;;; Created: 1994/7/11 -;;; Version: -;;; $Id: signature.el,v 7.11 1996/07/10 13:45:06 shuhei-k Exp $ -;;; Keywords: mail, news, signature -;;; -;;; This file is part of tm (Tools for MIME). -;;; -;;; This program is free software; you can redistribute it and/or -;;; modify it under the terms of the GNU General Public License as -;;; published by the Free Software Foundation; either version 2, or -;;; (at your option) any later version. -;;; -;;; This program is distributed in the hope that it will be useful, -;;; but WITHOUT ANY WARRANTY; without even the implied warranty of -;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -;;; General Public License for more details. -;;; -;;; You should have received a copy of the GNU General Public License -;;; along with This program. If not, write to the Free Software -;;; Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. -;;; + +;; Copyright (C) 1994,1995,1996 Free Software Foundation, Inc. + +;; Author: MORIOKA Tomohiko +;; OKABE Yasuo +;; Artur Pioro +;; KOBAYASHI Shuhei +;; Maintainer: Shuhei KOBAYASHI +;; Created: 1994/7/11 +;; Version: +;; $Id: signature.el,v 7.13 1996/08/30 04:34:56 morioka Exp $ +;; Keywords: mail, news, signature + +;; This file is part of tm (Tools for MIME). + +;; This program is free software; you can redistribute it and/or +;; modify it under the terms of the GNU General Public License as +;; published by the Free Software Foundation; either version 2, or (at +;; your option) any later version. + +;; This program is distributed in the hope that it will be useful, but +;; WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU +;; General Public License for more details. + +;; You should have received a copy of the GNU General Public License +;; along with this program; see the file COPYING. If not, write to +;; the Free Software Foundation, Inc., 59 Temple Place - Suite 330, +;; Boston, MA 02111-1307, USA. + ;;; Code: -(require 'tl-822) +(require 'std11) + ;;; @ valiables ;;; @@ -98,7 +95,7 @@ of file.") (let ((alist signature-file-alist) cell field value) (while alist (setq cell (car alist) - field (rfc822/get-field-body (car (car cell))) + field (std11-field-body (car (car cell))) value (cdr (car cell))) (cond ((functionp value) (let ((name (apply value field (cdr cell)))) -- 1.7.10.4