Refactoring: ein:completer-complete can take CALLBACKS argument

This commit is contained in:
Takafumi Arakaki 2012-11-19 20:44:16 +01:00
parent 9323f96b0d
commit 4efb68e226

View file

@ -66,14 +66,16 @@
(delete-region beg end)
(insert word))))
(defun ein:completer-complete (kernel)
(defun* ein:completer-complete
(kernel
&optional
(callbacks (list :complete_reply
(cons #'ein:completer-finish-completing nil))))
(interactive (list (ein:get-kernel)))
(let ((callbacks (list :complete_reply
(cons #'ein:completer-finish-completing nil))))
(ein:kernel-complete kernel
(thing-at-point 'line)
(current-column)
callbacks)))
(ein:kernel-complete kernel
(thing-at-point 'line)
(current-column)
callbacks))
(defun ein:completer-dot-complete ()
"Insert dot and request completion."