aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/ChangeLog4
-rw-r--r--lisp/ffap.el5
2 files changed, 7 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a9159efe5e1..fae9ac0b5c9 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
12008-09-25 Glenn Morris <rgm@gnu.org>
2
3 * ffap.el (ffap-fixup-url): Don't call url-normalize-url. (Bug#898)
4
12008-09-25 Chong Yidong <cyd@stupidchicken.com> 52008-09-25 Chong Yidong <cyd@stupidchicken.com>
2 6
3 * vc.el (vc-mark-resolved): Move message here from 7 * vc.el (vc-mark-resolved): Move message here from
diff --git a/lisp/ffap.el b/lisp/ffap.el
index 5d9b628a2c2..72efcb33542 100644
--- a/lisp/ffap.el
+++ b/lisp/ffap.el
@@ -633,8 +633,9 @@ Looks at `ffap-ftp-default-user', returns \"\" for \"localhost\"."
633 ((and ffap-url-unwrap-local (ffap-url-unwrap-local url))) 633 ((and ffap-url-unwrap-local (ffap-url-unwrap-local url)))
634 ((and ffap-url-unwrap-remote ffap-ftp-regexp 634 ((and ffap-url-unwrap-remote ffap-ftp-regexp
635 (ffap-url-unwrap-remote url))) 635 (ffap-url-unwrap-remote url)))
636 ((fboundp 'url-normalize-url) ; may autoload url (part of w3) 636 ;; All this seems to do is remove any trailing "#anchor" part (Bug#898).
637 (url-normalize-url url)) 637;;; ((fboundp 'url-normalize-url) ; may autoload url (part of w3)
638;;; (url-normalize-url url))
638 (url))) 639 (url)))
639 640
640 641