about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorCase Duckworth2021-09-06 12:52:11 -0500
committerCase Duckworth2021-09-06 12:52:21 -0500
commit9b80cec576f7eadd51a59ddc9730d2cb53140682 (patch)
tree1d70ace34af69fe583e6c789046f0cbd31f3bf95
parentReorganize eshell config (diff)
downloademacs-9b80cec576f7eadd51a59ddc9730d2cb53140682.tar.gz
emacs-9b80cec576f7eadd51a59ddc9730d2cb53140682.zip
Whitespace
-rw-r--r--init.el10
-rw-r--r--lisp/acdw-eshell.el1
2 files changed, 5 insertions, 6 deletions
diff --git a/init.el b/init.el index a394d9a..b73cc80 100644 --- a/init.el +++ b/init.el
@@ -1450,14 +1450,14 @@ browser defined in `browse-url-secondary-browser-function'."
1450(setup (:straight persistent-scratch) 1450(setup (:straight persistent-scratch)
1451 (:option persistent-scratch-backup-directory (acdw/dir "scratch" t) 1451 (:option persistent-scratch-backup-directory (acdw/dir "scratch" t)
1452 persistent-scratch-keep-n-newest-backups 12) 1452 persistent-scratch-keep-n-newest-backups 12)
1453 1453
1454 (persistent-scratch-setup-default) 1454 (persistent-scratch-setup-default)
1455 1455
1456 (mapc (lambda (buf) 1456 (mapc (lambda (buf)
1457 (with-current-buffer buf 1457 (with-current-buffer buf
1458 (when (funcall persistent-scratch-scratch-buffer-p-function) 1458 (when (funcall persistent-scratch-scratch-buffer-p-function)
1459 (setq lexical-binding t)
1460 (persistent-scratch-mode +1)))) 1459 (persistent-scratch-mode +1))))
1460
1461 (buffer-list))) 1461 (buffer-list)))
1462 1462
1463(setup (:straight-if pkgbuild-mode 1463(setup (:straight-if pkgbuild-mode
@@ -1553,7 +1553,7 @@ browser defined in `browse-url-secondary-browser-function'."
1553 ;; user-full-name)) 1553 ;; user-full-name))
1554 ;; "! " 1554 ;; "! "
1555 ;; "Welcome to GNU Emacs.\n\n") 1555 ;; "Welcome to GNU Emacs.\n\n")
1556 initial-major-mode 'emacs-lisp-mode) 1556 )
1557 1557
1558 (add-hook 'kill-buffer-query-functions 1558 (add-hook 'kill-buffer-query-functions
1559 (defun kill-buffer-query@immortal-scratch () 1559 (defun kill-buffer-query@immortal-scratch ()
@@ -1664,7 +1664,7 @@ browser defined in `browse-url-secondary-browser-function'."
1664 ,reserve))) 1664 ,reserve)))
1665 'face '(:inherit simple-modeline-space)) 1665 'face '(:inherit simple-modeline-space))
1666 right)))) 1666 right))))
1667 1667
1668 (simple-modeline-mode +1)) 1668 (simple-modeline-mode +1))
1669 1669
1670(setup (:straight-if sly 1670(setup (:straight-if sly
diff --git a/lisp/acdw-eshell.el b/lisp/acdw-eshell.el index 104b7d1..fa27299 100644 --- a/lisp/acdw-eshell.el +++ b/lisp/acdw-eshell.el
@@ -22,7 +22,6 @@
22 22
23;;; Eshell starting and quitting 23;;; Eshell starting and quitting
24 24
25;;;###autoload
26(defun eshell-quit-or-delete-char (arg) 25(defun eshell-quit-or-delete-char (arg)
27 "Delete the character to the right, or quit eshell on an empty line." 26 "Delete the character to the right, or quit eshell on an empty line."
28 (interactive "p") 27 (interactive "p")