(mh-insert-signature): Use force-mode-line-update.

diff --git a/lisp/mail/mh-comp.el b/lisp/mail/mh-comp.el
index e774d7cd3bfa8effd58eb63b31f7d11ef2733cbe..cc69be64c3d613df28a4d4afd1e430a5cd487000 100644 (file)
--- a/lisp/mail/mh-comp.el
+++ b/lisp/mail/mh-comp.el
@@ -25,7 +25,7 @@
 
 ;;; Change Log:
 
-;; $Id: mh-comp.el,v 1.4 1995/04/10 00:19:27 kwzh Exp kwzh $
+;; $Id: mh-comp.el,v 1.5 1995/04/20 23:35:49 kwzh Exp kwzh $
 
 ;;; Code:
 
@@ -756,7 +756,7 @@ Prompt for the field name with a completion list of the current folders."
   "Insert the file named by mh-signature-file-name at the current point."
   (interactive)
   (insert-file-contents mh-signature-file-name)
-  (set-buffer-modified-p (buffer-modified-p))) ; force mode line update
+  (force-mode-line-update))
 
 
 (defun mh-check-whom ()