This commit is contained in:
2024-09-07 00:44:53 +03:00
parent f8a16189f0
commit 5971d9534e
+6 -6
View File
@@ -779,7 +779,7 @@ Need to autoload dired-x for dired-omit
:config :config
(evil-collection-magit-setup) (evil-collection-magit-setup)
:bind :bind
(:map anerenv/global-minor-mode/open-keymap (:map azos/global-minor-mode/open-keymap
("g" . 'magit-status)) ("g" . 'magit-status))
) )
#+end_src #+end_src
@@ -789,7 +789,7 @@ Need to autoload dired-x for dired-omit
#+begin_src emacs-lisp #+begin_src emacs-lisp
(require 'org-faces) (require 'org-faces)
(defun anerenv/set-org-mode-fixed-pitch-faces () (defun azos/set-org-mode-fixed-pitch-faces ()
(mapc (lambda (face) (set-face-attribute face nil (mapc (lambda (face) (set-face-attribute face nil
:font (face-attribute 'fixed-pitch :font) :font (face-attribute 'fixed-pitch :font)
:height (face-attribute 'fixed-pitch :height))) :height (face-attribute 'fixed-pitch :height)))
@@ -809,12 +809,12 @@ Need to autoload dired-x for dired-omit
(use-package org (use-package org
:hook :hook
(org-mode . variable-pitch-mode) (org-mode . variable-pitch-mode)
(org-mode . anerenv/set-bidi-env) (org-mode . azos/set-bidi-env)
(org-mode . (lambda () (org-mode . (lambda ()
(setq-local whitespace-style '(face tabs trailing tab-mark (setq-local whitespace-style '(face tabs trailing tab-mark
indentation)))) indentation))))
:config :config
(anerenv/set-org-mode-fixed-pitch-faces) (azos/set-org-mode-fixed-pitch-faces)
(setq org-src-tab-acts-natively t (setq org-src-tab-acts-natively t
org-adapt-indentation nil org-adapt-indentation nil
org-startup-folded t org-startup-folded t
@@ -881,7 +881,7 @@ This section makes code-indentation correction work inside source blocks.
Taken from: https://github.com/emacs-evil/evil/issues/1288 Taken from: https://github.com/emacs-evil/evil/issues/1288
#+begin_src emacs-lisp #+begin_src emacs-lisp
(defun anerenv/org/evil-org-insert-state-in-edit-buffer (fun &rest args) (defun azos/org/evil-org-insert-state-in-edit-buffer (fun &rest args)
"Bind `evil-default-state' to `insert' before calling FUN with ARGS." "Bind `evil-default-state' to `insert' before calling FUN with ARGS."
(let ((evil-default-state 'insert) (let ((evil-default-state 'insert)
;; Force insert state ;; Force insert state
@@ -895,7 +895,7 @@ Taken from: https://github.com/emacs-evil/evil/issues/1288
(evil-refresh-cursor))) (evil-refresh-cursor)))
(advice-add 'org-babel-do-key-sequence-in-edit-buffer (advice-add 'org-babel-do-key-sequence-in-edit-buffer
:around #'anerenv/org/evil-org-insert-state-in-edit-buffer) :around #'azos/org/evil-org-insert-state-in-edit-buffer)
#+end_src #+end_src
* Provide * Provide