diff options
Diffstat (limited to 'lisp/+scratch.el')
| -rw-r--r-- | lisp/+scratch.el | 3 |
1 files changed, 1 insertions, 2 deletions
| diff --git a/lisp/+scratch.el b/lisp/+scratch.el index 2a89a95..b724a94 100644 --- a/lisp/+scratch.el +++ b/lisp/+scratch.el | |||
| @@ -5,7 +5,7 @@ | |||
| 5 | ;;(require 'scratch) | 5 | ;;(require 'scratch) |
| 6 | 6 | ||
| 7 | (defun +scratch-immortal () | 7 | (defun +scratch-immortal () |
| 8 | "Bury, don't kill \"*scratc*\" buffer. | 8 | "Bury, don't kill \"*scratch*\" buffer. |
| 9 | For `kill-buffer-query-functions'." | 9 | For `kill-buffer-query-functions'." |
| 10 | (if (eq (current-buffer) (get-buffer "*scratch*")) | 10 | (if (eq (current-buffer) (get-buffer "*scratch*")) |
| 11 | (progn (bury-buffer) | 11 | (progn (bury-buffer) |
| @@ -24,6 +24,5 @@ For `kill-buffer-query-functions'." | |||
| 24 | (next-line 2)) | 24 | (next-line 2)) |
| 25 | (rename-buffer (concat "*scratch<" mode ">*") t))) | 25 | (rename-buffer (concat "*scratch<" mode ">*") t))) |
| 26 | 26 | ||
| 27 | |||
| 28 | (provide '+scratch) | 27 | (provide '+scratch) |
| 29 | ;;; +scratch.el ends here | 28 | ;;; +scratch.el ends here |