branch: externals/leaf
commit 6e9a4cc252a43ce002f53179b2bd9494da57b1c4
Author: Naoya Yamashita <[email protected]>
Commit: Naoya Yamashita <[email protected]>
unify expression; use `in <leafname> block at <filename>`
---
leaf.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/leaf.el b/leaf.el
index c6d4bfe..b7fdd40 100644
--- a/leaf.el
+++ b/leaf.el
@@ -905,7 +905,7 @@ FN also accept list of FN."
`(condition-case err
(progn ,@body)
(error
- (display-warning 'leaf (format ,(format "Error in `%s' file `%s' block.
Error msg: %%s" load-file-name name)
+ (display-warning 'leaf (format ,(format "Error in `%s' block at `%s'.
Error msg: %%s" name load-file-name)
(error-message-string err))))))
(defmacro leaf-handler-package (name pkg _pin)
@@ -923,8 +923,8 @@ FN also accept list of FN."
(error
(display-warning 'leaf
(format
- ,(format "In `%s' file `%s' block, failed to
:package of %s. Error msg: %%s"
- load-file-name name pkg)
+ ,(format "In `%s' block at `%s', failed to
:package of %s. Error msg: %%s"
+ name load-file-name pkg)
(error-message-string err)))))))))
(defmacro leaf-handler-auth (name sym store)