1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-04 11:40:22 +00:00

(command-line): Convert command line args

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

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)))