From: morioka Date: Tue, 10 Mar 1998 18:39:36 +0000 (+0000) Subject: semi 0.96. X-Git-Tag: semi-0_96^2 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=f9a043cb583d0789d288569e566cf6c4f752b1e4;p=elisp%2Fsemi.git semi 0.96. --- diff --git a/signature.el b/signature.el index b111892..3a2446b 100644 --- a/signature.el +++ b/signature.el @@ -1,18 +1,16 @@ ;;; signature.el --- a signature utility for GNU Emacs -;; Copyright (C) 1994,1995,1996 Free Software Foundation, Inc. +;; Copyright (C) 1994,1995,1996,1997 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 $ +;; Version: $Id: signature.el,v 7.15 1997/07/04 16:41:27 morioka Exp $ ;; Keywords: mail, news, signature -;; This file is part of tm (Tools for MIME). +;; This file is part of SEMI (SEMI is Emacs MIME Interfaces). ;; This program is free software; you can redistribute it and/or ;; modify it under the terms of the GNU General Public License as @@ -47,6 +45,10 @@ of file.") (defvar signature-load-hook nil "*List of functions called after signature.el is loaded.") +(defvar signature-separator "-- \n" + "*String to separate contents and signature. +It is inserted when signature is inserted at end of file.") + (defvar signature-file-name "~/.signature" "*Name of file containing the user's signature.") @@ -145,6 +147,9 @@ specify a file named -DISTRIBUTION interactively." (if signature-delete-blank-lines-at-eof (delete-blank-lines)) )) (run-hooks 'signature-insert-hook) + (if (= (point)(point-max)) + (insert signature-separator) + ) (insert-file-contents signature-file-name) (force-mode-line-update) signature-file-name))