emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] scratch/hyperbole 2a58ece547 01/15: * hload-path.el (hyperb:dir):


From: Stefan Monnier
Subject: [elpa] scratch/hyperbole 2a58ece547 01/15: * hload-path.el (hyperb:dir): Use `macroexp-file-name`
Date: Tue, 2 May 2023 00:26:05 -0400 (EDT)

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)
                            ""))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]