From: yamaoka <yamaoka>
Date: Thu, 12 Nov 1998 05:41:24 +0000 (+0000)
Subject: * lisp/message.el (message-maybe-split-and-send-mail): Use `defsubst'
X-Git-Tag: pgnus-ichikawa-199811302358~71
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=9a4c9b1e0f2fe56e0f9d058aa7e9b95bbae6e441;p=elisp%2Fgnus.git-

* lisp/message.el (message-maybe-split-and-send-mail): Use `defsubst'
instead of `defun'.
(message-maybe-split-and-send-news): Ditto.
---

diff --git a/lisp/message.el b/lisp/message.el
index a6ee039..5759911 100644
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -2280,7 +2280,7 @@ the user from the mailer."
 	(eval (car actions)))))
     (pop actions)))
 
-(defun message-maybe-split-and-send-mail ()
+(defsubst message-maybe-split-and-send-mail ()
   "Split a message if necessary, and send it via mail.
 Returns nil if sending succeeded, returns any string if sending failed.
 This sub function is for exclusive use of `message-send-mail'."
@@ -2520,7 +2520,7 @@ to find out how to use this."
 	    (error "Sending failed; " result)))
       (error "Sending failed; no recipients"))))
 
-(defun message-maybe-split-and-send-news ()
+(defsubst message-maybe-split-and-send-news ()
   "Split a message if necessary, and send it via news.
 Returns nil if sending succeeded, returns t if sending failed.
 This sub function is for exclusive use of `message-send-news'."