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

Diff of /emacs/lisp/files.el

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

revision 1.591 by kfstorm, Sun Jul 7 23:15:04 2002 UTC revision 1.592 by handa, Tue Jul 9 02:41:40 2002 UTC
# Line 3910  If WILDCARD, it also runs the shell spec Line 3910  If WILDCARD, it also runs the shell spec
3910    
3911            ;; Read the actual directory using `insert-directory-program'.            ;; Read the actual directory using `insert-directory-program'.
3912            ;; RESULT gets the status code.            ;; RESULT gets the status code.
3913            (let ((coding-system-for-read            (let* ((coding-system-for-read
3914                   (and enable-multibyte-characters                    (and enable-multibyte-characters
3915                        (or file-name-coding-system                         (or file-name-coding-system
3916                            default-file-name-coding-system)))                             default-file-name-coding-system)))
3917                  ;; This is to control encoding the arguments in call-process.                   ;; This is to control encoding the arguments in call-process.
3918                  (coding-system-for-write coding-system-for-read))                   (coding-system-for-write coding-system-for-read))
3919              (setq result              (setq result
3920                    (if wildcard                    (if wildcard
3921                        ;; Run ls in the directory part of the file pattern                        ;; Run ls in the directory part of the file pattern

Legend:
Removed from v.1.591  
changed lines
  Added in v.1.592

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