equal
deleted
inserted
replaced
1112 (setq helm-locate-command "locate %s -e %s") |
1112 (setq helm-locate-command "locate %s -e %s") |
1113 |
1113 |
1114 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
1114 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
1115 (message "company") |
1115 (message "company") |
1116 |
1116 |
|
1117 (when (and (fboundp 'package-installed-p) (package-installed-p 'company)) |
|
1118 (require 'company)) |
|
1119 |
1117 (setq company-dabbrev-other-buffers 'all) ; or `t' or `nil' |
1120 (setq company-dabbrev-other-buffers 'all) ; or `t' or `nil' |
1118 ;; (setq company-dabbrev-time-limit 0.1) |
1121 ;; (setq company-dabbrev-time-limit 0.1) |
1119 (setq company-dabbrev-downcase nil) |
1122 (setq company-dabbrev-downcase nil) |
1120 |
1123 |
1121 ;; (setq company-backends (delete 'company-dabbrev company-backends)) |
1124 ;; (setq company-backends (delete 'company-dabbrev company-backends)) |
1130 "Company completion for executable in PATH." |
1133 "Company completion for executable in PATH." |
1131 (interactive (list 'interactive)) |
1134 (interactive (list 'interactive)) |
1132 (cl-case command |
1135 (cl-case command |
1133 (interactive (company-begin-backend 'company-executable)) |
1136 (interactive (company-begin-backend 'company-executable)) |
1134 (prefix (thing-at-point 'filename)) |
1137 (prefix (thing-at-point 'filename)) |
1135 (candidates (locate-file-completion-table exec-path exec-suffixes (thing-at-point 'filename) 'identity t)))) |
1138 (candidates (locate-file-completion-table exec-path exec-suffixes (thing-at-point 'filename) 'identity t)) |
|
1139 ;; (annotation (concat " " (locate-file arg exec-path exec-suffixes))) |
|
1140 (meta (concat "Full path: " (locate-file arg exec-path exec-suffixes))))) |
1136 |
1141 |
1137 (defun my/company-text-setup () |
1142 (defun my/company-text-setup () |
1138 (setq-local company-backends '((company-dabbrev company-files))) |
1143 (setq-local company-backends '((company-dabbrev company-files))) |
1139 (company-mode 1)) |
1144 (company-mode 1)) |
1140 |
1145 |