[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] elpa-admin e79cce6: * elpa-admin.el (elpaa--get-section): Fix fet
From: |
Stefan Monnier |
Subject: |
[elpa] elpa-admin e79cce6: * elpa-admin.el (elpaa--get-section): Fix fetching from main file |
Date: |
Sun, 20 Dec 2020 18:58:32 -0500 (EST) |
branch: elpa-admin
commit e79cce6d9f8eadb494808ec539b3c4e045543c9d
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>
* elpa-admin.el (elpaa--get-section): Fix fetching from main file
---
elpa-admin.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/elpa-admin.el b/elpa-admin.el
index 8e17b4c..c546329 100644
--- a/elpa-admin.el
+++ b/elpa-admin.el
@@ -811,9 +811,10 @@ Rename DIR/ to PKG-VERS/, and return the descriptor."
(with-temp-buffer
(insert-file-contents (expand-file-name fsection srcdir))
(buffer-string)))
- ((file-readable-p (elpaa--main-file pkg-spec))
+ ((file-readable-p (expand-file-name (elpaa--main-file pkg-spec) srcdir))
(with-temp-buffer
- (insert-file-contents (elpaa--main-file pkg-spec))
+ (insert-file-contents
+ (expand-file-name (elpaa--main-file pkg-spec) srcdir))
(emacs-lisp-mode) ;lm-section-start needs the outline-mode setting.
(let ((start (lm-section-start hsection)))
(when start
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] elpa-admin e79cce6: * elpa-admin.el (elpaa--get-section): Fix fetching from main file,
Stefan Monnier <=