branch: externals/setup
commit bc0edb481509471596b2d30a08f1db35efa7a540
Author: Philip K <[email protected]>
Commit: Philip K <[email protected]>
Handle argument list for :load-from properly
---
setup.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/setup.el b/setup.el
index d2b786e..11babe7 100644
--- a/setup.el
+++ b/setup.el
@@ -500,7 +500,7 @@ the first PACKAGE."
:documentation "Add PATH to load path.
This macro can be used as HEAD, and it will replace itself with
the nondirectory part of PATH."
- :shorthand (lambda (path) (intern (file-name-nondirectory path))))
+ :shorthand (lambda (args) (intern (file-name-nondirectory (cadr args)))))
(setup-define :file-match
(lambda (pat)
