summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMaciej Barć <xgqt@gentoo.org>2022-08-17 17:01:59 +0200
committerMaciej Barć <xgqt@gentoo.org>2022-08-17 17:14:41 +0200
commit303356daec48d7c7ea25541439cbb79cbfa281ff (patch)
tree5216310809ed93618eecb51b63ff8362d6c9079e
parentCask: add yas (diff)
downloadcompany-ebuild-303356daec48d7c7ea25541439cbb79cbfa281ff.tar.gz
company-ebuild-303356daec48d7c7ea25541439cbb79cbfa281ff.tar.bz2
company-ebuild-303356daec48d7c7ea25541439cbb79cbfa281ff.zip
company-ebuild.el: company-ebuild--find-eclass-files - remove redundant check
Signed-off-by: Maciej Barć <xgqt@gentoo.org>
-rw-r--r--company-ebuild.el12
1 files changed, 5 insertions, 7 deletions
diff --git a/company-ebuild.el b/company-ebuild.el
index 9c857e2..7a1b51a 100644
--- a/company-ebuild.el
+++ b/company-ebuild.el
@@ -142,15 +142,13 @@ FILE-PATH is the location from which we start searching for repository root."
(file-exists-p file-path)
(locate-dominating-file file-path "profiles/repo_name")))
-(defun company-ebuild--find-eclass-files (file-path)
+(defun company-ebuild--find-eclass-files (repo-root)
"Return found Eclass files.
-FILE-PATH is the location from which we start searching for Eclass files."
- (let ((repo-root
- (company-ebuild--find-repo-root file-path)))
- (and repo-root
- (directory-files
- (expand-file-name "eclass" repo-root) t ".*\\.eclass" t))))
+REPO-ROOT is the location from which we start searching for Eclass files."
+ (and repo-root
+ (directory-files
+ (expand-file-name "eclass" repo-root) t ".*\\.eclass" t)))
(defun company-ebuild--regenerate-dynamic-keywords-eclasses ()
"Set new content of the ‘company-ebuild--dynamic-keywords’ Eclass variables."