equal
deleted
inserted
replaced
1116 ;; (setq company-dabbrev-time-limit 0.1) |
1116 ;; (setq company-dabbrev-time-limit 0.1) |
1117 (setq company-dabbrev-downcase nil) |
1117 (setq company-dabbrev-downcase nil) |
1118 |
1118 |
1119 ;; (setq company-backends (delete 'company-dabbrev company-backends)) |
1119 ;; (setq company-backends (delete 'company-dabbrev company-backends)) |
1120 |
1120 |
1121 ;; company-transformers |
1121 (defun my-company-filter-out-numbers (lst) |
|
1122 (cl-remove-if (lambda (str) (string-match-p "^[0-9]" str)) lst)) |
|
1123 |
|
1124 (when (featurep 'company) |
|
1125 (push #'my-company-filter-out-numbers company-transformers)) |
1122 |
1126 |
1123 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
1127 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
1124 (message "bookmark") |
1128 (message "bookmark") |
1125 |
1129 |
1126 ;; (require 'autobm) |
1130 ;; (require 'autobm) |