branch: elpa-admin
commit e79cce6d9f8eadb494808ec539b3c4e045543c9d
Author: Stefan Monnier <monn...@iro.umontreal.ca>
Commit: Stefan Monnier <monn...@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

Reply via email to