andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(url-basepath): Add url-basepath as an alias for url-file-directory.

Browse source
This commit is contained in:
Chong Yidong 2008-11-04 17:11:58 +00:00
parent 92066e8365
commit 08299ea7e3
1 changed files with 3 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/url/url-util.el
View file

@ -236,6 +236,9 @@ Will not do anything if `url-show-status' is nil."
(round (* 100 (/ x (float y))))
(/ (* 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."