From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 17 Jan 1995 02:33:49 +0000 (+0000)
Subject: (command-line-1): Handle -f with kbd macro.
X-Git-Tag: emacs-19.34~5414
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1908c565548bf4c72153ffaf9ef382e50164386f;p=emacs.git

(command-line-1): Handle -f with kbd macro.
---

diff --git a/lisp/startup.el b/lisp/startup.el
index 54c0b0aa5db..a884e61a183 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -609,7 +609,9 @@ Type \\[describe-distribution] for information on getting the latest version."))
 		     (setq tem (intern argval))
 		   (setq tem (intern (car command-line-args-left)))
 		   (setq command-line-args-left (cdr command-line-args-left)))
-		 (funcall tem))
+		 (if (arrayp (symbol-function tem))
+		     (command-execute tem)
+		   (funcall tem)))
 		((or (string-equal argi "-l")
 		     (string-equal argi "-load"))
 		 (if argval