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

(command-line): Convert command line args

Browse source 
to Emacs internal representation using locale-coding-system.
This commit is contained in:
Richard M. Stallman 2001-12-25 17:15:14 +00:00
parent da3ab9c771
commit c16eb7b010
1 changed files with 7 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
lisp/startup.el
View file

@ -698,6 +698,13 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'."
(set-locale-environment nil)
;; Convert the arguments to Emacs internal representation.
(let ((args (cdr command-line-args)))
(while args
(setcar args
(decode-coding-string (car args) locale-coding-system t))
(setq args (cdr args))))
(let ((done nil)
(args (cdr command-line-args)))