changeset 11947:5c923b88c9da

(command-line): Handle nil command-line-args.
author Geoff Voelker <voelker@cs.washington.edu>
date Fri, 26 May 1995 20:11:39 +0000
parents 581775d8ec7a
children 19ebc17d1288
files lisp/startup.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/startup.el	Fri May 26 18:56:09 1995 +0000
+++ b/lisp/startup.el	Fri May 26 20:11:39 1995 +0000
@@ -438,7 +438,7 @@
 	     (error "Option `%s' doesn't allow an argument" argi))))
 
     ;; Re-attach the program name to the front of the arg list.
-    (setcdr command-line-args args))
+    (and command-line-args (setcdr command-line-args args)))
 
   ;; Under X Windows, this creates the X frame and deletes the terminal frame.
   (if (fboundp 'face-initialize)