1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00

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

This commit is contained in:
Chong Yidong 2008-11-04 17:11:58 +00:00
parent 92066e8365
commit 08299ea7e3

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."