You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
gentoo-overlay/app-emacs/package-lint/files/package-lint-0.22-load-data...

18 lines
611 B

--- a/package-lint.el
+++ b/package-lint.el
@@ -113,11 +113,9 @@ optional minimum version containing the feature.")
(defun package-lint--load-data (file)
"Load sexp data from FILE."
(with-temp-buffer
- (insert-file-contents
- (expand-file-name file
- (if load-file-name
- (file-name-directory load-file-name)
- default-directory)))
+ (let ((ef (expand-file-name file "@SITEETC@")))
+ (insert-file-contents
+ (if (file-exists-p ef) ef file)))
(read (current-buffer))))
(defconst package-lint-symbol-info