Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-18 10:57:34 +00:00
Code Issues Projects Releases Packages Wiki Activity

(command-line): Extract arg value properly for -u.

Browse source
This commit is contained in:
Richard M. Stallman 1995-06-27 10:05:39 +00:00
parent 4cde72b44e
commit d3bea05f1f
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/startup.el
View file

@ -415,8 +415,8 @@ specified by the LC_ALL, LC_CTYPE and LANG environment variables.")
((or (string-equal argi "-u")
(string-equal argi "-user"))
(or argval
(setq argval (car args)
args (cdr args)))
(setq args (cdr args)
argval (car args)))
(setq init-file-user argval
argval nil
args (cdr args)))