Commit 2b3869b4 authored by João Távora's avatar João Távora
Browse files

Unbreak more tests

* sly.el (sly-simple-completions): Ressurected.
parent 27de7bc9
Showing with 7 additions and 4 deletions
+7 -4
......@@ -3347,14 +3347,17 @@ Perform completion more similar to Emacs' complete-symbol."
(beg (sly-symbol-start-pos))
(prefix (and beg
(buffer-substring-no-properties beg end)))
(sly-current-thread t)
(result (and prefix
(sly-eval
`(swank:simple-completions ,prefix
',(sly-current-package))))))
(sly-simple-completions prefix))))
(when result
(list beg end (car result)))))
(defun sly-simple-completions (prefix)
(let ((sly-current-thread t))
(sly-eval
`(swank:simple-completions ,prefix ',(sly-current-package)))))
(defun sly-show-arglist ()
(let ((op (ignore-errors
(save-excursion
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment