|
From: | Andy Wingo |
Subject: | Re: Trouble using (current-filename) |
Date: | Thu, 16 Feb 2012 23:25:12 +0100 |
User-agent: | Gnus/5.13 (Gnus v5.13) Emacs/23.3 (gnu/linux) |
On Thu 16 Feb 2012 22:34, address@hidden (Ludovic Courtès) writes: > Andy Wingo <address@hidden> skribis: > >> (define-syntax current-filename >> (lambda (x) >> "A macro that expands to the current filename: the filename that >> the (current-filename) form appears in. Expands to #f if this >> information is unavailable." >> (false-if-exception >> (pk 'canonicalized (canonicalize-path (pk 'filename (assq-ref >> (syntax-source x) 'filename))))))) > > What about not canonicalizing the file name? That makes this recipe not work: (add-to-load-path (dirname (current-filename))) I think the canonicalize-path was added after Neil's concerns about add-to-load-path. We could take it out if that's the thing to do; dunno. A -- http://wingolog.org/
[Prev in Thread] | Current Thread | [Next in Thread] |