aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2009-09-01 03:17:03 +0000
committerGlenn Morris2009-09-01 03:17:03 +0000
commit95e55d202d5df9d0663f9d1fc214ba01cf264427 (patch)
treef3f03b8ff7831b0ff7b9ffff8e9d3f243ea54c28
parentb0f3d955cb68459c7bac57946ea704c6dfeb85bb (diff)
downloademacs-95e55d202d5df9d0663f9d1fc214ba01cf264427.tar.gz
emacs-95e55d202d5df9d0663f9d1fc214ba01cf264427.zip
(browse-url-file-url): Use default-value rather than
default-enable-multibyte-characters.
-rw-r--r--lisp/net/browse-url.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/net/browse-url.el b/lisp/net/browse-url.el
index 992a081fefd..6f180341f36 100644
--- a/lisp/net/browse-url.el
+++ b/lisp/net/browse-url.el
@@ -699,7 +699,7 @@ interactively. Turn the filename into a URL with function
699(defun browse-url-file-url (file) 699(defun browse-url-file-url (file)
700 "Return the URL corresponding to FILE. 700 "Return the URL corresponding to FILE.
701Use variable `browse-url-filename-alist' to map filenames to URLs." 701Use variable `browse-url-filename-alist' to map filenames to URLs."
702 (let ((coding (and default-enable-multibyte-characters 702 (let ((coding (and (default-value 'enable-multibyte-characters)
703 (or file-name-coding-system 703 (or file-name-coding-system
704 default-file-name-coding-system)))) 704 default-file-name-coding-system))))
705 (if coding (setq file (encode-coding-string file coding)))) 705 (if coding (setq file (encode-coding-string file coding))))