From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: "T. V. Raman" Newsgroups: gmane.emacs.devel Subject: url: url-basepath Date: Thu, 30 Oct 2008 06:25:59 -0700 Message-ID: <18697.46567.950755.660619@gargle.gargle.HOWL> Reply-To: raman@users.sf.net NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit X-Trace: ger.gmane.org 1225373189 26987 80.91.229.12 (30 Oct 2008 13:26:29 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Thu, 30 Oct 2008 13:26:29 +0000 (UTC) To: emacs-devel@gnu.org Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Thu Oct 30 14:27:31 2008 connect(): Connection refused Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.50) id 1KvXYa-00048O-RP for ged-emacs-devel@m.gmane.org; Thu, 30 Oct 2008 14:27:25 +0100 Original-Received: from localhost ([127.0.0.1]:40830 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1KvXXU-0000su-0G for ged-emacs-devel@m.gmane.org; Thu, 30 Oct 2008 09:26:16 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1KvXXM-0000rN-Oy for emacs-devel@gnu.org; Thu, 30 Oct 2008 09:26:08 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1KvXXK-0000pb-D8 for emacs-devel@gnu.org; Thu, 30 Oct 2008 09:26:08 -0400 Original-Received: from [199.232.76.173] (port=34817 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1KvXXK-0000pX-6h for emacs-devel@gnu.org; Thu, 30 Oct 2008 09:26:06 -0400 Original-Received: from qmta04.emeryville.ca.mail.comcast.net ([76.96.30.40]:43588) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1KvXXJ-00041l-Py for emacs-devel@gnu.org; Thu, 30 Oct 2008 09:26:06 -0400 Original-Received: from OMTA08.emeryville.ca.mail.comcast.net ([76.96.30.12]) by QMTA04.emeryville.ca.mail.comcast.net with comcast id YzSi1a0250FhH24A41S2Hg; Thu, 30 Oct 2008 13:26:02 +0000 Original-Received: from localhost ([71.202.191.236]) by OMTA08.emeryville.ca.mail.comcast.net with comcast id Z1S01a00F56Ur8v8U1S0SK; Thu, 30 Oct 2008 13:26:00 +0000 X-Authority-Analysis: v=1.0 c=1 a=2z1OXlWFAAAA:8 a=iMdAVBlNGdH5OHmsOM0A:9 a=oL6wYKjkMxw-GxAOxB706YuMxq0A:4 a=MSl-tDqOz04A:10 a=XF7b4UCPwd8A:10 Original-Received: by localhost (Postfix, from userid 1000) id 585FB12A4102; Thu, 30 Oct 2008 06:26:00 -0700 (PDT) X-Mailer: VM alpha-479 under Emacs 23.0.60.1 (i686-pc-linux-gnu) x-attribution: tvr X-detected-operating-system: by monty-python.gnu.org: Genre and OS details not recognized. X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:105169 Archived-At: 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 possible. 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." (cond ((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, --raman Email: raman@users.sf.net WWW: http://emacspeak.sf.net/raman/ AIM: emacspeak GTalk: tv.raman.tv@gmail.com PGP: http://emacspeak.sf.net/raman/raman-almaden.asc Google: tv+raman IRC: irc://irc.freenode.net/#emacs