mirror of
https://github.com/vale981/emacs-jupyter
synced 2025-03-09 18:06:39 -04:00
jupyter-available-kernelspecs: Re-add sorting of kernelspecs by name
This was mistakenly removed by a previous commit.
This commit is contained in:
parent
357bdc869b
commit
12e23f578f
1 changed files with 15 additions and 10 deletions
|
@ -81,16 +81,21 @@ REFRESH."
|
|||
(error "Can't obtain kernelspecs from jupyter shell command")))
|
||||
:kernelspecs)))
|
||||
(puthash
|
||||
host (cl-loop
|
||||
for (kname spec) on specs by #'cddr
|
||||
for name = (substring (symbol-name kname) 1)
|
||||
for dir = (plist-get spec :resource_dir)
|
||||
collect (make-jupyter-kernelspec
|
||||
:name name
|
||||
:resource-directory (concat
|
||||
(unless (string= host "local") host)
|
||||
dir)
|
||||
:plist (plist-get spec :spec)))
|
||||
host
|
||||
(sort
|
||||
(cl-loop
|
||||
for (kname spec) on specs by #'cddr
|
||||
for name = (substring (symbol-name kname) 1)
|
||||
for dir = (plist-get spec :resource_dir)
|
||||
collect (make-jupyter-kernelspec
|
||||
:name name
|
||||
:resource-directory (concat
|
||||
(unless (string= host "local") host)
|
||||
dir)
|
||||
:plist (plist-get spec :spec)))
|
||||
(lambda (x y)
|
||||
(string< (jupyter-kernelspec-name x)
|
||||
(jupyter-kernelspec-name y))))
|
||||
jupyter--kernelspecs)))))
|
||||
kernelspecs))
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue