]> code.delx.au - dotemacs/blobdiff - text-edit/my-new-scratch-buffer.el
Massive update!
[dotemacs] / text-edit / my-new-scratch-buffer.el
similarity index 89%
rename from lisp/my-scratch.el
rename to text-edit/my-new-scratch-buffer.el
index dc387d840a6c565e4c835e2531a2272c5e10494e..47161a90ab785adb448b04f02c9d03c5b98e2238 100644 (file)
@@ -3,7 +3,7 @@
 (setq initial-scratch-message nil)
 (setq initial-major-mode 'emacs-lisp-mode)
 
-(defun my/scratch-buffer ()
+(defun my/new-scratch-buffer ()
   "Create a new scratch buffer to work in. (could be *scratch* - *scratchX*)"
   (interactive)
   (let ((n 0)
@@ -16,3 +16,5 @@
              (get-buffer bufname)))
     (switch-to-buffer (get-buffer-create bufname))
     (funcall initial-major-mode)))
+
+(provide 'my-new-scratch-buffer)