/[emacs]/emacs/lisp/startup.el
ViewVC logotype

Diff of /emacs/lisp/startup.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.280 by rms, Sun Dec 16 18:27:51 2001 UTC revision 1.281 by rms, Tue Dec 25 17:15:14 2001 UTC
# Line 698  or `CVS', and any subdirectory that cont Line 698  or `CVS', and any subdirectory that cont
698    
699    (set-locale-environment nil)    (set-locale-environment nil)
700    
701      ;; Convert the arguments to Emacs internal representation.
702      (let ((args (cdr command-line-args)))
703        (while args
704          (setcar args
705                  (decode-coding-string (car args) locale-coding-system t))
706          (setq args (cdr args))))
707    
708    (let ((done nil)    (let ((done nil)
709          (args (cdr command-line-args)))          (args (cdr command-line-args)))
710    

Legend:
Removed from v.1.280  
changed lines
  Added in v.1.281

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26