# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1225818718 0
# Node ID 7b5dc289401404b809cf3a2f981441c0e72dcb05
# Parent  0698cc9516d07fe1835ed8ab79604a1608e5cf89
(url-basepath): Add url-basepath as an alias for url-file-directory.

diff -r 0698cc9516d0 -r 7b5dc2894014 lisp/url/url-util.el
--- a/lisp/url/url-util.el	Tue Nov 04 17:11:52 2008 +0000
+++ b/lisp/url/url-util.el	Tue Nov 04 17:11:58 2008 +0000
@@ -237,6 +237,9 @@
     (/ (* x 100) y)))
 
 ;;;###autoload
+(defalias 'url-basepath 'url-file-directory)
+
+;;;###autoload
 (defun url-file-directory (file)
   "Return the directory part of FILE, for a URL."
   (cond