Add ein:notebook-rename-to-scratch-command

This commit is contained in:
Takafumi Arakaki 2012-07-14 16:36:51 +02:00
parent 22fc876723
commit b79a51c657

View file

@ -1116,6 +1116,14 @@ NAME is any non-empty string that does not contain '/' or '\\'."
(run-hooks 'ein:notebook-after-rename-hook))) (run-hooks 'ein:notebook-after-rename-hook)))
ein:notebook)) ein:notebook))
(defun ein:notebook-rename-to-scratch-command (name)
"Rename notebook based on `ein:scratch-notebook-name-template'
and save it immediately."
(interactive
(list (read-string "Rename notebook: "
(ein:scratch-notebook-name))))
(ein:notebook-rename-command name))
(defun ein:notebook-kill-kernel-then-close-command () (defun ein:notebook-kill-kernel-then-close-command ()
"Kill kernel and then kill notebook buffer. "Kill kernel and then kill notebook buffer.
It does not kill buffer if killing kernel fails. To close It does not kill buffer if killing kernel fails. To close