(ffap-fixup-url): Don't call url-normalize-url. (Bug#898)

4dd7f375 · Glenn Morris · 4968291f · 4dd7f375 · 4dd7f375
Commit 4dd7f375 authored Sep 25, 2008 by Glenn Morris
Hide whitespace changes
Inline Side-by-side

Showing with 7 additions and 2 deletions

lisp/ChangeLog lisp/ChangeLog +4 -0

lisp/ffap.el lisp/ffap.el +3 -2

No files found.
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
+2008-09-25  Glenn Morris  <rgm@gnu.org>
+
+	* ffap.el (ffap-fixup-url): Don't call url-normalize-url.  (Bug#898)
+
 2008-09-25  Chong Yidong  <cyd@stupidchicken.com>

 	* vc.el (vc-mark-resolved): Move message here from

--- a/lisp/ffap.el
+++ b/lisp/ffap.el
@@ -633,8 +633,9 @@ Looks at `ffap-ftp-default-user', returns \"\" for \"localhost\"."
   ((and ffap-url-unwrap-local (ffap-url-unwrap-local url)))
   ((and ffap-url-unwrap-remote ffap-ftp-regexp
 	 (ffap-url-unwrap-remote url)))
-   ((fboundp 'url-normalize-url)	; may autoload url (part of w3)
-    (url-normalize-url url))
+   ;; All this seems to do is remove any trailing "#anchor" part (Bug#898).
+;;;   ((fboundp 'url-normalize-url)	; may autoload url (part of w3)
+;;;    (url-normalize-url url))
   (url)))