[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

url: url-basepath

From: T. V. Raman
Subject: url: url-basepath
Date: Thu, 30 Oct 2008 06:25:59 -0700

This function disappeared from the emacs 23 version of url at
some point.
It's used by W3, I'd like to see this function restored if

Here is the original code:
(defun url-basepath (file &optional x)
  "Return the base pathname of FILE, or the actual filename if X is true."
   ((null file) "")
   ((string-match (eval-when-compile (regexp-quote "?")) file)
    (if x
        (file-name-nondirectory (substring file 0 (match-beginning 0)))
      (file-name-directory (substring file 0 (match-beginning 0)))))
   (x (file-name-nondirectory file))
   (t (file-name-directory file))))

Best Regards,

Email:  address@hidden
WWW:    http://emacspeak.sf.net/raman/
AIM:    emacspeak       GTalk: address@hidden
PGP:    http://emacspeak.sf.net/raman/raman-almaden.asc
Google: tv+raman 
IRC:    irc://irc.freenode.net/#emacs

reply via email to

[Prev in Thread] Current Thread [Next in Thread]