emacs: reindent

This commit is contained in:
Jeremy Baxter 2024-07-19 09:58:18 +12:00
parent f98a06ad41
commit 40118c9d9f

View file

@ -98,7 +98,7 @@
(add-to-list 'auto-mode-alist '("\\.di?\\'" . d-mode)) (add-to-list 'auto-mode-alist '("\\.di?\\'" . d-mode))
;; fix to make d-mode highlight primitive types properly ;; fix to make d-mode highlight primitive types properly
(font-lock-add-keywords 'd-mode (font-lock-add-keywords 'd-mode
'(("\\<\\(bool\\|byte\\|ubyte\\|char\\|delegate\\|double\\|float\\|function\\|int\\|long\\|short\\|uint\\|ulong\\|ushort\\|cent\\|ucent\\|real\\|ireal\\|idouble\\|ifloat\\|creal\\|cfloat\\|cdouble\\|wchar\\|dchar\\|void\\|string\\|wstring\\|dstring\\|__vector\\|Runtime\\|Thread\\)\\>" . 'font-lock-type-face))) '(("\\<\\(bool\\|byte\\|ubyte\\|char\\|delegate\\|double\\|float\\|function\\|int\\|long\\|short\\|uint\\|ulong\\|ushort\\|cent\\|ucent\\|real\\|ireal\\|idouble\\|ifloat\\|creal\\|cfloat\\|cdouble\\|wchar\\|dchar\\|void\\|string\\|wstring\\|dstring\\|__vector\\|Runtime\\|Thread\\)\\>" . 'font-lock-type-face)))
;; undo-tree ;; undo-tree
(package-install 'undo-tree) (package-install 'undo-tree)
@ -125,8 +125,9 @@
;; slime ;; slime
(package-install 'slime) (package-install 'slime)
(setq inferior-lisp-program "sbcl") (setq inferior-lisp-program "sbcl")
(add-hook 'slime-repl-mode-hook #'(lambda () (add-hook 'slime-repl-mode-hook
(keymap-local-set "C-c l" 'slime-hyperspec-lookup))) #'(lambda ()
(keymap-local-set "C-c l" 'slime-hyperspec-lookup)))
;; minibuffer completion ;; minibuffer completion
(package-install 'marginalia) (package-install 'marginalia)
@ -182,8 +183,9 @@
;; image-dired ;; image-dired
(package-install 'image-dired) (package-install 'image-dired)
(global-set-key (kbd "C-c i") 'image-dired) (global-set-key (kbd "C-c i") 'image-dired)
(add-hook 'image-dired-thumbnail-mode-hook #'(lambda () (add-hook 'image-dired-thumbnail-mode-hook
(keymap-local-set "M-RET" 'image-dired-display-this))) #'(lambda ()
(keymap-local-set "M-RET" 'image-dired-display-this)))
;; magit ;; magit
(package-install 'magit) (package-install 'magit)
@ -233,10 +235,13 @@
(package-install 'breadcrumb) (package-install 'breadcrumb)
(setq breadcrumb-project-crumb-separator " ] " (setq breadcrumb-project-crumb-separator " ] "
breadcrumb-imenu-crumb-separator " > ") breadcrumb-imenu-crumb-separator " > ")
(add-hook 'prog-mode-hook #'(lambda () (add-hook 'prog-mode-hook
(setq header-line-format '( #'(lambda ()
" " (:eval (breadcrumb-project-crumbs)) (setq header-line-format
" : " (:eval (breadcrumb-imenu-crumbs)))))) '(" "
(:eval (breadcrumb-project-crumbs))
" : "
(:eval (breadcrumb-imenu-crumbs))))))
;; dashboard ;; dashboard
(package-install 'dashboard) (package-install 'dashboard)
@ -251,7 +256,8 @@
"Merely an interface to your code." "Merely an interface to your code."
"“We don't use the term corelibs, and I am not sure what that would mean.”" "“We don't use the term corelibs, and I am not sure what that would mean.”"
"50 years and Dired is still the best file manager on the planet") "50 years and Dired is still the best file manager on the planet")
initial-buffer-choice (lambda () (get-buffer-create dashboard-buffer-name))) initial-buffer-choice (lambda ()
(get-buffer-create dashboard-buffer-name)))
(add-hook 'after-init-hook 'dashboard-insert-startupify-lists) (add-hook 'after-init-hook 'dashboard-insert-startupify-lists)
(add-hook 'after-init-hook 'dashboard-initialize) (add-hook 'after-init-hook 'dashboard-initialize)