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

ein:notebook-close available as a command

Browse source
This commit is contained in:
Takafumi Arakaki 2012-09-02 06:59:36 +02:00
parent ad333957c9
commit b088f7997c
1 changed files with 6 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/ein-notebook.el
View file

@ -616,6 +616,9 @@ NAME is any non-empty string that does not contain '/' or '\\'."
(defun ein:notebook-close (notebook)
"Close NOTEBOOK and kill its buffer."
(interactive (prog1 (list (ein:notebook--get-nb-or-error))
(or (ein:notebook-ask-before-kill-buffer)
(error "Quit"))))
(let ((ein:notebook-kill-buffer-ask nil))
;; Let `ein:notebook-kill-buffer-callback' do its job.
(mapc #'kill-buffer (ein:notebook-buffer-list notebook))))
@ -1014,6 +1017,7 @@ Do not use `python-mode'. Use plain mode when MuMaMo is not installed::
(define-key map "\C-c\C-r" 'ein:notebook-restart-kernel-command)
(define-key map "\C-c\C-z" 'ein:notebook-kernel-interrupt-command)
(define-key map "\C-c\C-q" 'ein:notebook-kill-kernel-then-close-command)
(define-key map (kbd "C-c C-#") 'ein:notebook-close)
(define-key map (kbd "C-:") 'ein:shared-output-eval-string)
(define-key map "\C-c\C-o" 'ein:console-open)
(define-key map "\C-x\C-s" 'ein:notebook-save-notebook-command)
@ -1045,6 +1049,8 @@ Do not use `python-mode'. Use plain mode when MuMaMo is not installed::
,@(ein:generate-menu
'(("Save notebook" ein:notebook-save-notebook-command)
("Rename notebook" ein:notebook-rename-command)
("Close notebook without saving"
ein:notebook-close)
("Kill kernel then close notebook"
ein:notebook-kill-kernel-then-close-command))))
("Edit"