[Emacs-diffs] Changes to emacs/lisp/url/url-util.el,v

[Glenn Morris]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       08/09/25 07:41:32

Index: url-util.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/url/url-util.el,v
retrieving revision 1.26
retrieving revision 1.27
diff -u -b -r1.26 -r1.27
--- url-util.el 2 Jul 2008 11:14:37 -0000       1.26
+++ url-util.el 25 Sep 2008 07:41:32 -0000      1.27
@@ -167,6 +167,8 @@
          type (url-type data))
     (if (member type '("www" "about" "mailto" "info"))
        (setq retval url)
+      ;; FIXME all this does, and all this function seems to do in
+      ;; most cases, is remove any trailing "#anchor" part of a url.
       (setf (url-target data) nil)
       (setq retval (url-recreate-url data)))
     retval))