Respect `package-lint-main-file' in parent file also

leotaku · Jan 5, 2024 · a31c361 · a31c361
1 parent 6893f2b
commit a31c361
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/elisp-check.el b/elisp-check.el
@@ -354,12 +354,12 @@ order to hook `byte-compile-file' into the CI message mechanism."
 
 (defun elisp-check-package-lint (&rest other)
   "Run a `package-lint-buffer' check on the current and OTHER buffers."
-  (let ((default-main-file (buffer-file-name)))
+  (let ((parent-main-file (or package-lint-main-file (buffer-file-name))))
     (elisp-check--package-lint-buffer)
     (dolist (buffer other)
       (with-current-buffer buffer
         (let ((package-lint-main-file
-               (or package-lint-main-file default-main-file)))
+               (or package-lint-main-file parent-main-file)))
           (elisp-check--package-lint-buffer))))))
 
 (defun elisp-check--package-lint-buffer ()