hiro/emacs-ipython-notebook
1
0
Fork 0
mirror of https://github.com/vale981/emacs-ipython-notebook synced 2025-03-06 09:31:39 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

Create notebooks with user-specified kernels.

Browse source 
This works with the New Notebook widget in the notebooklist,
need to check if the menu commands also work.
This commit is contained in:
John Miller 2016-01-13 08:30:15 -06:00
parent a89aa6aebd
commit 90920e28c6
2 changed files with 6 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/ein-kernel.el
View file

@ -132,8 +132,8 @@
:data (json-encode `(("notebook" .
(("path" . ,(ein:$notebook-notebook-path notebook))))
,@(if kernelspec
`("kernel"
(("name" . ,(ein:$kernelspec-name kernelspec)))))))
`(("kernel" .
(("name" . ,(ein:$kernelspec-name kernelspec))))))))
:parser #'ein:json-read
:success (apply-partially #'ein:kernel--kernel-started kernel))))))

7
lisp/ein-notebooklist.el
View file

@ -385,8 +385,9 @@ Notebook list data is passed via the buffer local variable
(default-kernel (ein:get-kernelspec (ein:$notebooklist-url-or-port ein:%notebooklist%) (first kernels))))
(widget-create
'link
:notify (lambda (&rest ignore) (call-interactively (ein:notebooklist-new-notebook (ein:$notebooklist-url-or-port ein:%notebooklist%)
default-kernel)))
:notify (lambda (&rest ignore) (call-interactively (ein:notebooklist-new-notebook
(ein:$notebooklist-url-or-port ein:%notebooklist%)
default-kernel)))
"New Notebook")
(widget-insert " ")
(widget-create
@ -400,7 +401,7 @@ Notebook list data is passed via the buffer local variable
(browse-url
(ein:url (ein:$notebooklist-url-or-port ein:%notebooklist%))))
"Open In Browser")
(widget-insert "\n\nAvailable Kernels:\n")
(widget-insert "\n\nCreate New Notebooks Using Kernel: \n")
(let* ((radio-widget (widget-create 'radio-button-choice
:value (first kernels)
:notify (lambda (widget &rest ignore)