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

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

[elpa] externals/gnus-mock 105b56d 1/2: Do a better job of finding our d


From: Eric Abrahamsen
Subject: [elpa] externals/gnus-mock 105b56d 1/2: Do a better job of finding our data directory
Date: Fri, 1 Jan 2021 16:48:12 -0500 (EST)

branch: externals/gnus-mock
commit 105b56df1b60166be65216c7871837c2ed8f4da4
Author: Eric Abrahamsen <eric@ericabrahamsen.net>
Commit: Eric Abrahamsen <eric@ericabrahamsen.net>

    Do a better job of finding our data directory
    
    * gnus-mock.el (gnus-mock-data-dir): Check some different conditions:
    Are we byte compiling? Loading this file? Eval'ing this defconst?
    Cribbed from ert-x.el.
---
 gnus-mock.el | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/gnus-mock.el b/gnus-mock.el
index 2c7604f..97ff891 100644
--- a/gnus-mock.el
+++ b/gnus-mock.el
@@ -121,9 +121,12 @@ installation."
 (defconst gnus-mock-data-dir
   (file-name-as-directory (expand-file-name
                           "data"
-                          (if load-file-name
-                              (file-name-directory load-file-name)
-                            default-directory)))
+                          (file-name-directory
+                           (or (bound-and-true-p
+                                byte-compile-current-file)
+                               (and load-in-progress load-file-name)
+                               buffer-file-name
+                               default-directory))))
   "Source directory for Gnus mock data.")
 
 ;;;###autoload



reply via email to

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