[elpa] scratch/hyperbole 2a58ece547 1/7: * hload-path.el (hyperb:dir): Use `macroexp-file-name`

[Stefan Monnier]

branch: scratch/hyperbole
commit 2a58ece547f7868d3010c409ca0b48aa35af995b
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>

    * hload-path.el (hyperb:dir): Use `macroexp-file-name`
---
 hload-path.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/hload-path.el b/hload-path.el
index 2b038ca6f4..1b418e79f5 100644
--- a/hload-path.el
+++ b/hload-path.el
@@ -42,7 +42,9 @@ Use `hyperb:wsl-os-p' to test if running under WSL.")
 ;;; ************************************************************************
 
 (defvar hyperb:dir (or (file-name-directory
-                       (or (and (stringp load-file-name) load-file-name)
+                       (or (if (fboundp 'macroexp-file-name) ;Emacs≥28
+                               (macroexp-file-name)
+                             (and (stringp load-file-name) load-file-name))
                            (locate-file "hmouse-tag.el" load-path)
                            (hyperb:path-being-loaded)
                            ""))