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:
parent
da3ab9c771
commit
c16eb7b010
@ -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)))
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user