SLY/Selector: Change name, only match REPLs, list all buffers in other source.
parent
735fc99881
commit
6b35571853
|
@ -4,7 +4,8 @@
|
||||||
"Return non-nil if BUFFER has a SLY connection matching
|
"Return non-nil if BUFFER has a SLY connection matching
|
||||||
`ambrevar/sly-connection-name'."
|
`ambrevar/sly-connection-name'."
|
||||||
(with-current-buffer buffer
|
(with-current-buffer buffer
|
||||||
(and sly-buffer-connection
|
(and (derived-mode-p 'sly-mrepl-mode)
|
||||||
|
sly-buffer-connection
|
||||||
(sly-process sly-buffer-connection)
|
(sly-process sly-buffer-connection)
|
||||||
(string-prefix-p ambrevar/sly-connection-name
|
(string-prefix-p ambrevar/sly-connection-name
|
||||||
(helm-sly-connection-name sly-buffer-connection)))))
|
(helm-sly-connection-name sly-buffer-connection)))))
|
||||||
|
@ -15,8 +16,10 @@
|
||||||
(interactive)
|
(interactive)
|
||||||
(helm :sources (list (helm-sly--c-source-connection
|
(helm :sources (list (helm-sly--c-source-connection
|
||||||
(helm-sly--repl-buffer-candidates
|
(helm-sly--repl-buffer-candidates
|
||||||
nil #'ambrevar/helm-sly-buffer-p))
|
nil #'ambrevar/helm-sly-buffer-p)
|
||||||
|
"Ambrevar's Lisp connections")
|
||||||
helm-sly-new
|
helm-sly-new
|
||||||
|
(helm-sly-lisp-buffer-source)
|
||||||
(helm-sly-build-buffers-source))
|
(helm-sly-build-buffers-source))
|
||||||
:buffer "*ambrevar/helm-sly-mini*"))
|
:buffer "*ambrevar/helm-sly-mini*"))
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue