[elpa] scratch/hyperbole aaaf6cfeea 01/15: * hload-path.el (hyperb:dir): Use `macroexp-file-name`

[Stefan Monnier]

branch: scratch/hyperbole
commit aaaf6cfeeaa40a54ba1bb8da33114b5159ce34d5
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 3e9f4f0935..b71239b7a9 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)
                            ""))