Compare files using 'file-equal-p'

Compare files using 'file-equal-p' v1 APPLIED

Philip Kaludercic: 1
 Compare files using 'file-equal-p'

 1 files changed, 1 insertions(+), 1 deletions(-)

Export patchset (mbox)

How do I use this?

Copy & paste the following snippet into your terminal to import this patchset into git:

curl -s https://lists.sr.ht/~protesilaos/ef-themes/patches/34789/mbox | git am -3

Learn more about email & git

Reply to thread View this thread in the archives

[PATCH] Compare files using 'file-equal-p' Export this patch

Philip Kaludercic <philipk@posteo.net>

2 years ago

Doing so is generally more resilient and might avoid an unexpected
edge case in the future.
---
 ef-themes.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ef-themes.el b/ef-themes.el
index f770f3d..dcaa7d6 100644
--- a/ef-themes.el
+++ b/ef-themes.el
@@ -1385,7 +1385,7 @@ Those are stored in `ef-themes-faces' and
 ;;;###autoload
 (when load-file-name
   (let ((dir (file-name-directory load-file-name)))
-    (unless (equal dir (expand-file-name "themes/" data-directory))
+    (unless (file-equal-p dir (expand-file-name "themes/" data-directory))
       (add-to-list 'custom-theme-load-path dir))))
 
 (provide 'ef-themes)
-- 
2.37.2

Protesilaos Stavrou <info@protesilaos.com>

2 years ago
Installed.  Thank you!