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

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

[elpa] scratch/hyperbole f8f407a69f 01/12: * hload-path.el (hyperb:dir):


From: Stefan Monnier
Subject: [elpa] scratch/hyperbole f8f407a69f 01/12: * hload-path.el (hyperb:dir): Use `macroexp-file-name`
Date: Tue, 27 Jun 2023 17:38:39 -0400 (EDT)

branch: scratch/hyperbole
commit f8f407a69f8a1424bf695a827e9310040106d21a
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 34ad0f8115..b9b0a8b820 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)
                            ""))
                       (error



reply via email to

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