From faf2a3cf35f572d544c6b7e6516dbc84300b339f Mon Sep 17 00:00:00 2001 From: Protesilaos Stavrou Date: Sun, 7 Jan 2024 07:37:47 +0200 Subject: [PATCH] emacs: make some trivial formatting changes --- .../.emacs.d/prot-emacs-modules/prot-emacs-langs.el | 12 ++++++------ emacs/.emacs.d/prot-emacs.org | 12 ++++++------ 2 files changed, 12 insertions(+), 12 deletions(-) diff --git a/emacs/.emacs.d/prot-emacs-modules/prot-emacs-langs.el b/emacs/.emacs.d/prot-emacs-modules/prot-emacs-langs.el index 79567bbd..8529c920 100644 --- a/emacs/.emacs.d/prot-emacs-modules/prot-emacs-langs.el +++ b/emacs/.emacs.d/prot-emacs-modules/prot-emacs-langs.el @@ -165,11 +165,11 @@ Meant to be added to `prog-mode-hook'." (flymake-mode 1))) (defun prot/flymake-mode-in-my-projects () - (when-let* ((file (buffer-file-name)) - ((string-prefix-p prot/flymake-mode-projects-path - (expand-file-name file))) - ((not (file-directory-p file))) - ((file-regular-p file))) + (when-let ((file (buffer-file-name)) + ((string-prefix-p prot/flymake-mode-projects-path + (expand-file-name file))) + ((not (file-directory-p file))) + ((file-regular-p file))) (add-hook 'find-file-hook #'prot/flymake-mode-lexical-binding nil t))) (add-hook 'emacs-lisp-mode-hook #'prot/flymake-mode-in-my-projects) @@ -193,7 +193,7 @@ Meant to be added to `prog-mode-hook'." ;;;; `outline' (`outline-mode' and `outline-minor-mode') (:delay 10) (setq outline-minor-mode-highlight nil) ; emacs28 - (setq outline-minor-mode-cycle t) ; emacs28 + (setq outline-minor-mode-cycle t) ; emacs28 (setq outline-minor-mode-use-buttons nil) ; emacs29---bless you for the nil option! (setq outline-minor-mode-use-margins nil) ; as above (define-key global-map (kbd "") #'outline-minor-mode) diff --git a/emacs/.emacs.d/prot-emacs.org b/emacs/.emacs.d/prot-emacs.org index 1f4556d2..3581699d 100644 --- a/emacs/.emacs.d/prot-emacs.org +++ b/emacs/.emacs.d/prot-emacs.org @@ -7632,11 +7632,11 @@ commands. For the technicalities, read the man page ~sxhkd(1)~. (flymake-mode 1))) (defun prot/flymake-mode-in-my-projects () - (when-let* ((file (buffer-file-name)) - ((string-prefix-p prot/flymake-mode-projects-path - (expand-file-name file))) - ((not (file-directory-p file))) - ((file-regular-p file))) + (when-let ((file (buffer-file-name)) + ((string-prefix-p prot/flymake-mode-projects-path + (expand-file-name file))) + ((not (file-directory-p file))) + ((file-regular-p file))) (add-hook 'find-file-hook #'prot/flymake-mode-lexical-binding nil t))) (add-hook 'emacs-lisp-mode-hook #'prot/flymake-mode-in-my-projects) @@ -7667,7 +7667,7 @@ commands. For the technicalities, read the man page ~sxhkd(1)~. ;;;; `outline' (`outline-mode' and `outline-minor-mode') (:delay 10) (setq outline-minor-mode-highlight nil) ; emacs28 - (setq outline-minor-mode-cycle t) ; emacs28 + (setq outline-minor-mode-cycle t) ; emacs28 (setq outline-minor-mode-use-buttons nil) ; emacs29---bless you for the nil option! (setq outline-minor-mode-use-margins nil) ; as above (define-key global-map (kbd "") #'outline-minor-mode)