From: morioka Date: Mon, 9 Mar 1998 19:32:41 +0000 (+0000) Subject: tm 7.71. X-Git-Tag: tm7_71 X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=158af224de699c0a561aa13b3d7563a1a109b69d;p=elisp%2Fsemi.git tm 7.71. --- diff --git a/signature.el b/signature.el index 08220bc..a3850a7 100644 --- a/signature.el +++ b/signature.el @@ -14,7 +14,7 @@ ;;; Maintainer: KOBAYASHI Shuhei ;;; Created: 1994/7/11 ;;; Version: -;;; $Id: signature.el,v 7.10 1996/05/28 03:04:34 morioka Exp $ +;;; $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). @@ -41,7 +41,7 @@ ;;; (defvar signature-insert-at-eof nil - "*Insert signature at the end of file if non-nil.") + "*If non-nil, insert signature at the end of file.") (defvar signature-delete-blank-lines-at-eof nil "*If non-nil, signature-insert-at-eof deletes blank lines at the end @@ -127,7 +127,7 @@ of file.") (defun insert-signature (&optional arg) "Insert the file named by signature-file-name. -It is inserted at the end of file if signature-insert-at-eof in non-nil, +It is inserted at the end of file if signature-insert-at-eof is non-nil, and otherwise at the current point. A prefix argument enables user to specify a file named -DISTRIBUTION interactively." (interactive "P") @@ -145,7 +145,7 @@ specify a file named -DISTRIBUTION interactively." (progn (goto-char (point-max)) (or (bolp) (insert "\n")) - (or signature-delete-blank-lines-at-eof (delete-blank-lines)) + (if signature-delete-blank-lines-at-eof (delete-blank-lines)) )) (run-hooks 'signature-insert-hook) (insert-file-contents signature-file-name)