diff options
| author | Nicholas Vollmer <iarchivedmywholelife@gmail.com> | 2020-07-28 01:32:24 -0400 |
|---|---|---|
| committer | Nicholas Vollmer <iarchivedmywholelife@gmail.com> | 2020-07-28 01:32:24 -0400 |
| commit | 860a6e5736bdb67dd12a3aeeeea69beeeae47cc7 (patch) | |
| tree | 386627fb7b4f9a930d2fab94170a9458a28aee28 /helm-mode.el | |
| parent | e2e8dabadbf067a2ecd68aca041a4431bea586ff (diff) | |
Fix byte compiler warnings
Diffstat (limited to 'helm-mode.el')
| -rw-r--r-- | helm-mode.el | 11 |
1 files changed, 8 insertions, 3 deletions
diff --git a/helm-mode.el b/helm-mode.el index 18062375..62179fca 100644 --- a/helm-mode.el +++ b/helm-mode.el @@ -25,8 +25,13 @@ (defvar crm-separator) (defvar ido-everywhere) (defvar completion-flex-nospace) +(defvar helm-completion--sorting-done) +(defvar helm-mode) (declare-function ido-mode "ido.el") +(declare-function helm-apropos-init "helm-elisp") +(declare-function helm-lisp-completion-persistent-action "helm-elisp") +(declare-function helm-lisp-completion-persistent-help "helm-elisp") (defgroup helm-mode nil "Enable helm completion." @@ -1634,7 +1639,7 @@ Actually does nothing." (length prefix))))))) (defun helm-flex-add-score-as-prop (candidates regexp) - (cl-loop with case-fold-search = (helm-set-case-fold-search) + (cl-loop with case-fold-search = (helm-set-case-fold-search) for cand in candidates collect (helm-flex--style-score cand regexp))) @@ -1858,7 +1863,7 @@ Can be used for `completion-in-region-function' by advicing it with an (when helm-completion-mark-suffix (run-with-idle-timer 0.01 nil (lambda () - (helm-aand + (helm-aand (+ (- (point) point) end) (and (> it (point)) it) (push-mark it t t)))))) @@ -1949,7 +1954,7 @@ Note: This mode is incompatible with Emacs23." (when (fboundp 'ffap-read-file-or-url-internal) ;; `ffap-read-file-or-url-internal' have been removed in ;; emacs-27 and `ffap-read-file-or-url' is fixed, so no need - ;; to advice it. + ;; to advice it. (advice-add 'ffap-read-file-or-url :override #'helm-advice--ffap-read-file-or-url))) (progn (remove-function completing-read-function #'helm--completing-read-default) |