fix indentation
This commit is contained in:
@@ -113,14 +113,14 @@
|
|||||||
|
|
||||||
(with-eval-after-load "company"
|
(with-eval-after-load "company"
|
||||||
(defun systemd-company-backend (command &optional arg &rest ignored)
|
(defun systemd-company-backend (command &optional arg &rest ignored)
|
||||||
(interactive (list 'interactive))
|
(interactive (list 'interactive))
|
||||||
(cl-case command
|
(cl-case command
|
||||||
(interactive (company-begin-backend 'systemd-company-backend))
|
(interactive (company-begin-backend 'systemd-company-backend))
|
||||||
(prefix (and (eq major-mode 'systemd-mode)
|
(prefix (and (eq major-mode 'systemd-mode)
|
||||||
(company-grab-symbol)))
|
(company-grab-symbol)))
|
||||||
(candidates
|
(candidates
|
||||||
(cl-remove-if-not (lambda (c) (string-prefix-p arg c))
|
(cl-remove-if-not (lambda (c) (string-prefix-p arg c))
|
||||||
systemd-company-directives))))
|
systemd-company-directives))))
|
||||||
(defun systemd-company--setup-company (enable)
|
(defun systemd-company--setup-company (enable)
|
||||||
(when enable
|
(when enable
|
||||||
(add-to-list (make-local-variable 'company-backends) 'systemd-company-backend))
|
(add-to-list (make-local-variable 'company-backends) 'systemd-company-backend))
|
||||||
|
|||||||
Reference in New Issue
Block a user