10sr 5 роки тому
джерело
коміт
82faff8072
Підписано: 10sr Ідентифікатор GPG ключа: 7BEC428194130EB2
1 змінених файлів з 5 додано та 3 видалено
  1. +5
    -3
      emacs.el

+ 5
- 3
emacs.el Переглянути файл

@@ -1054,15 +1054,17 @@ found, otherwise returns nil."
(define-key company-active-map (kbd "C-i") 'company-complete-selection)
(define-key company-active-map (kbd "C-f") 'company-complete-selection)

(defvar company-mode)
(defvar company-candidates)
(defvar company-candidates-length)
;; (popup-tip "Hello, World!")
(require 'popup nil t)
(defun my-company-length-popup-tip ()
"Show tooltip of candidate length."
(interactive)
;; Do nothing when already in company completion
(unless company-candidates
(when (and (require 'popup nil t)
company-mode
;; Do nothing when already in company completion
(not company-candidates))
(let ((l nil))
(unwind-protect
(progn


Завантаження…
Відмінити
Зберегти