Whitespace

This commit is contained in:
Case Duckworth 2021-09-06 12:52:11 -05:00
parent 3e7bb0cc18
commit 9b80cec576
2 changed files with 5 additions and 6 deletions

10
init.el
View File

@ -1450,14 +1450,14 @@ browser defined in `browse-url-secondary-browser-function'."
(setup (:straight persistent-scratch)
(:option persistent-scratch-backup-directory (acdw/dir "scratch" t)
persistent-scratch-keep-n-newest-backups 12)
(persistent-scratch-setup-default)
(mapc (lambda (buf)
(with-current-buffer buf
(when (funcall persistent-scratch-scratch-buffer-p-function)
(setq lexical-binding t)
(persistent-scratch-mode +1))))
(buffer-list)))
(setup (:straight-if pkgbuild-mode
@ -1553,7 +1553,7 @@ browser defined in `browse-url-secondary-browser-function'."
;; user-full-name))
;; "! "
;; "Welcome to GNU Emacs.\n\n")
initial-major-mode 'emacs-lisp-mode)
)
(add-hook 'kill-buffer-query-functions
(defun kill-buffer-query@immortal-scratch ()
@ -1664,7 +1664,7 @@ browser defined in `browse-url-secondary-browser-function'."
,reserve)))
'face '(:inherit simple-modeline-space))
right))))
(simple-modeline-mode +1))
(setup (:straight-if sly

View File

@ -22,7 +22,6 @@
;;; Eshell starting and quitting
;;;###autoload
(defun eshell-quit-or-delete-char (arg)
"Delete the character to the right, or quit eshell on an empty line."
(interactive "p")