10sr преди 5 години
родител
ревизия
82faff8072
Подписан от: 10sr GPG ключ ID: 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


Зареждане…
Отказ
Запис