changeset 14625:4cbc6690c0f7

(news-reply-mode-map): Delete news-reply-signature. (news-reply-signature): Improve the message. (news-reply-yank-message-id, news-reply-yank-from): Fix swapped args in defvars.

--- a/lisp/mail/rnewspost.el	Wed Feb 21 21:21:55 1996 +0000
+++ b/lisp/mail/rnewspost.el	Wed Feb 21 21:24:40 1996 +0000
@@ -96,8 +96,6 @@
 	(cons "News" (make-sparse-keymap "News")))
       (define-key news-reply-mode-map [menu-bar news news-caesar-buffer-body]
 	'("Rot13" . news-caesar-buffer-body))
-      (define-key news-reply-mode-map [menu-bar news news-reply-signature]
-	'("Signature" . news-reply-signature))
       (define-key news-reply-mode-map [menu-bar news news-reply-yank-original]
 	'("Yank Original" . news-reply-yank-original))
       (define-key news-reply-mode-map [menu-bar news mail-fill-yanked-message]
@@ -140,13 +138,11 @@
 		paragraph-separate))
   (run-hooks 'text-mode-hook 'news-reply-mode-hook))
 
-(defvar news-reply-yank-from
-  "Save `From:' field for `news-reply-yank-original'."
-  "")
+(defvar news-reply-yank-from ""
+  "Save `From:' field for `news-reply-yank-original'.")
 
-(defvar news-reply-yank-message-id
-  "Save `Message-Id:' field for `news-reply-yank-original'."
-  "")
+(defvar news-reply-yank-message-id ""
+  "Save `Message-Id:' field for `news-reply-yank-original'.")
 
 (defun news-reply-yank-original (arg)
   "Insert the message being replied to, if any (in Mail mode).
@@ -222,7 +218,7 @@
 (defun news-reply-signature ()
   "The inews program appends `~/.signature' automatically."
   (interactive)
-  (message "`~/.signature' will be appended automatically."))
+  (message "Posting news will append your signature automatically."))
 
 (defun news-setup (to subject in-reply-to newsgroups replybuffer)
   "Set up the news reply or posting buffer with the proper headers and mode."