[Emacs-diffs] Changes to emacs/lisp/dired.el

[Miles Bader]

Index: emacs/lisp/dired.el
diff -c emacs/lisp/dired.el:1.256 emacs/lisp/dired.el:1.257
*** emacs/lisp/dired.el:1.256   Thu Feb 13 14:34:17 2003
--- emacs/lisp/dired.el Wed Mar 19 06:58:25 2003
***************
*** 1462,1477 ****
                         (or (dired-string-replace-match
                              "\\([^\\]\\|\\`\\)\"" file "\\1\\\\\"" nil t)
                             file)
!                        "\"")))))
      (and file (file-name-absolute-p file)
         ;; A relative file name can start with ~.
         ;; Don't treat it as absolute in this context.
         (not (eq (aref file 0) ?~))
         (setq already-absolute t))
-     (and file buffer-file-coding-system
-        (not file-name-coding-system)
-        (not default-file-name-coding-system)
-        (setq file (encode-coding-string file buffer-file-coding-system)))
      (cond
       ((null file)
        nil)
--- 1462,1478 ----
                         (or (dired-string-replace-match
                              "\\([^\\]\\|\\`\\)\"" file "\\1\\\\\"" nil t)
                             file)
!                        "\"")))
!         ;; The above `read' will return a unibyte string if FILE
!         ;; contains eight-bit-control/graphic characters.
!         (if (and enable-multibyte-characters
!                  (not (multibyte-string-p file)))
!             (setq file (string-to-multibyte file)))))
      (and file (file-name-absolute-p file)
         ;; A relative file name can start with ~.
         ;; Don't treat it as absolute in this context.
         (not (eq (aref file 0) ?~))
         (setq already-absolute t))
      (cond
       ((null file)
        nil)