Mercurial > emacs

changeset 50187:8c92ccc7b6dd

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(command-line-1): Use command-execute for any command.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Tue, 18 Mar 2003 09:41:39 +0000
parents f510db4ad041
children 334078c4c044
files lisp/startup.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/startup.el	Tue Mar 18 04:27:53 2003 +0000
+++ b/lisp/startup.el	Tue Mar 18 09:41:39 2003 +0000
@@ -1623,7 +1623,7 @@
                                 "-funcall"
                                 "-e"))  ; what the source used to say
                  (setq tem (intern (or argval (pop command-line-args-left))))
-                 (if (arrayp (symbol-function tem))
+                 (if (commandp tem)
                      (command-execute tem)
                    (funcall tem)))