]> code.delx.au - gnu-emacs-elpa/commitdiff
Don't rely on async.el being in load-path.
authorRyan C. Thompson <rct@thompsonclan.org>
Mon, 18 Nov 2013 02:52:25 +0000 (18:52 -0800)
committerRyan C. Thompson <rct@thompsonclan.org>
Mon, 18 Nov 2013 03:10:53 +0000 (19:10 -0800)
This uses "symbol-file" instead of "find-library-name" to figure out
where async.el is. This works even if async.el was loaded without adding
its directory to the load-path.

Fixes #15.

async.el

index 4c79816d493bfdde4eda719bfd3c0d4f20e20988..f22f90018ab278a4d96018a9a90ff599dd7622be 100644 (file)
--- a/async.el
+++ b/async.el
@@ -268,8 +268,7 @@ returns nil.  It can still be useful, however, as an argument to
                        (expand-file-name invocation-name
                                          invocation-directory))
               ,finish-func
-              "-Q" "-l" ,(funcall (symbol-function 'find-library-name)
-                                  "async")
+              "-Q" "-l" ,(symbol-file 'async-batch-invoke 'defun)
               "-batch" "-f" "async-batch-invoke"
               (if async-send-over-pipe
                   "<none>"