diff options
| -rw-r--r-- | lisp/url/url-util.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/url/url-util.el b/lisp/url/url-util.el index ffa19be50b2..b68e044604c 100644 --- a/lisp/url/url-util.el +++ b/lisp/url/url-util.el | |||
| @@ -237,6 +237,9 @@ Will not do anything if `url-show-status' is nil." | |||
| 237 | (/ (* x 100) y))) | 237 | (/ (* x 100) y))) |
| 238 | 238 | ||
| 239 | ;;;###autoload | 239 | ;;;###autoload |
| 240 | (defalias 'url-basepath 'url-file-directory) | ||
| 241 | |||
| 242 | ;;;###autoload | ||
| 240 | (defun url-file-directory (file) | 243 | (defun url-file-directory (file) |
| 241 | "Return the directory part of FILE, for a URL." | 244 | "Return the directory part of FILE, for a URL." |
| 242 | (cond | 245 | (cond |