scip/dot-emacs
1
0
Fork 0
mirror of https://codeberg.org/scip/dot-emacs.git synced 2025-12-17 12:30:59 +01:00
Code Issues Packages Projects Releases Wiki Activity

renamed autoscratch mode

Browse Source
This commit is contained in:
Thomas von Dein
2023-06-01 19:33:32 +02:00
parent 08c5f5458a
commit 4dc608af31
3 changed files with 30 additions and 24 deletions
Download Patch File Download Diff File Expand all files Collapse all files

44
lisp/init-autoscratch.el
View File

@@ -10,28 +10,28 @@
;; *** Autoscratch
;; use autoscratch otherwise
;; [[https://github.com/TLINDEN/autoscratch][autoscratch github]]
(use-package autoscratch-mode
:ensure nil
:config
(setq initial-major-mode 'autoscratch-mode)
(add-hook 'autoscratch-mode-hook '(lambda ()
(setq autoscratch-triggers-alist
'(("[(;]" . (progn
(call-interactively 'emacs-lisp-mode)
(call-interactively 'enable-paredit-mode)
(call-interactively 'electric-pair-mode)))
("#" . (progn
(call-interactively 'config-general-mode)
(electric-indent-local-mode t)))
("[-a-zA-Z0-9]" . (text-mode))
("/" . (c-mode))
("*" . (progn (insert " ") (org-mode)))
("." . (fundamental-mode)))
autoscratch-trigger-on-first-char t
autoscratch-reset-default-directory t)
(electric-indent-local-mode nil)
))
(defalias 'scratch 'autoscratch-buffer))
(use-package autoscratch
:ensure nil
:config
(setq initial-major-mode 'autoscratch-mode)
(add-hook 'autoscratch-mode-hook '(lambda ()
(setq autoscratch-triggers-alist
'(("[(;]" . (progn
(call-interactively 'emacs-lisp-mode)
(call-interactively 'enable-paredit-mode)
(call-interactively 'electric-pair-mode)))
("#" . (progn
(call-interactively 'config-general-mode)
(electric-indent-local-mode t)))
("[-a-zA-Z0-9]" . (text-mode))
("/" . (c-mode))
("*" . (progn (insert " ") (org-mode)))
("." . (fundamental-mode)))
autoscratch-trigger-on-first-char t
autoscratch-reset-default-directory t)
(electric-indent-local-mode nil)
))
(defalias 'scratch 'autoscratch-buffer))
;;; *** Persistent Scratch
;; I also like to be scratch buffers persistent with

2
lisp/init-elget.el
View File

@@ -20,7 +20,7 @@
(el-get-bundle autoscratch
:type github
:pkgname "tlinden/autoscratch"
:features autoscratch-mode)
:features autoscratch)
(el-get-bundle novel-mode
:type github