FUEL: Highlight matched subword in completion buffer; autodoc in listener.
parent
472a8edcc8
commit
de10ff8cb4
|
@ -72,6 +72,7 @@ the same as C-cz)).
|
|||
|
||||
- TAB : complete word at point
|
||||
- M-. : edit word at point in Emacs
|
||||
- C-ca : toggle autodoc mode
|
||||
- C-cv : edit vocabulary
|
||||
- C-ch : help for word at point
|
||||
- C-ck : run file
|
||||
|
|
|
@ -110,7 +110,7 @@ terminates a current completion."
|
|||
(defun fuel-completion--display-comp-list (completions base)
|
||||
(let ((savedp (fuel-completion--maybe-save-window-configuration)))
|
||||
(with-output-to-temp-buffer fuel-completion--comp-buffer
|
||||
(display-completion-list completions)
|
||||
(display-completion-list completions base)
|
||||
(let ((offset (- (point) 1 (length base))))
|
||||
(with-current-buffer standard-output
|
||||
(setq completion-base-size offset)
|
||||
|
|
|
@ -143,6 +143,7 @@ buffer."
|
|||
|
||||
(define-key fuel-listener-mode-map "\C-cz" 'run-factor)
|
||||
(define-key fuel-listener-mode-map "\C-c\C-z" 'run-factor)
|
||||
(define-key fuel-listener-mode-map "\C-ca" 'fuel-autodoc-mode)
|
||||
(define-key fuel-listener-mode-map "\C-ch" 'fuel-help)
|
||||
(define-key fuel-listener-mode-map "\M-." 'fuel-edit-word-at-point)
|
||||
(define-key fuel-listener-mode-map "\C-cv" 'fuel-edit-vocabulary)
|
||||
|
|
Loading…
Reference in New Issue