From: morioka Date: Mon, 9 Mar 1998 11:38:11 +0000 (+0000) Subject: tm 7.26. X-Git-Tag: tm7_26 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=3277bb075f16edab9d78a9f319e96b32e2af6ebe;p=elisp%2Fsemi.git tm 7.26. --- diff --git a/signature.el b/signature.el index e577f90..ecd1673 100644 --- a/signature.el +++ b/signature.el @@ -8,7 +8,7 @@ ;;; Author: MORIOKA Tomohiko ;;; OKABE Yasuo (1994/08/01) ;;; Version: -;;; $Id: signature.el,v 4.0 1995/10/26 09:25:23 morioka Exp $ +;;; $Id: signature.el,v 7.0 1995/11/16 16:28:53 morioka Exp $ ;;; Keywords: mail, news, signature ;;; ;;; This file is part of tm (Tools for MIME). @@ -98,17 +98,16 @@ signature-file-name nil) (signature/get-signature-file-name))))) - (save-excursion - (if (file-readable-p signature) - (progn - (goto-char (point-max)) - (if (not (bolp)) - (insert "\n")) - (delete-blank-lines) - (insert-file-contents signature) - (set-buffer-modified-p (buffer-modified-p)) + (if (file-readable-p signature) + (progn + (goto-char (point-max)) + (if (not (bolp)) + (insert "\n")) + (delete-blank-lines) + (insert-file-contents signature) + (set-buffer-modified-p (buffer-modified-p)) ; force mode line update - ))) + )) signature)) (defun insert-signature (&optional arg)