nits

1 files changed, 46 insertions, 47 deletions

diff --git a/init.org b/init.org
index 711c997..580a41f 100644
--- a/init.org
+++ b/init.org
@@ -1149,7 +1149,7 @@
       (global-set-key (kbd "s-a") #'jao-first-window)
       (global-set-key (kbd "H-s-a") #'jao-first-window)
       (global-set-key (kbd "C-x p") 'jao-prev-window)
-      (global-set-key (kbd "M-o") #'other-window)
+      (global-set-key (kbd "M-o") #'jao-other-window)
       (global-set-key (kbd "M-p") #'jao-prev-window)
 
       (global-set-key (kbd "C-c 0") #'jao-first-window)
@@ -1329,39 +1329,42 @@
     #+BEGIN_SRC emacs-lisp
       (use-package tex-site
         :ensure auctex
-        :init (progn (setq TeX-auto-save t)
-                     (setq TeX-parse-self t)
-                     (setq TeX-a4-paper t)
-                     (setq TeX-auto-local ".tex-auto-local")
-                     ;; Preferred view format: dvi, ps, pdf, pdfs
-                     (setq TeX-view-format "pdf")
-                     (setq-default TeX-master "../main") ; nil to ask
-                     (setq TeX-view-program-selection
-                           (jao-d-l
-                            '((output-dvi "open")
-                              (output-pdf "open")
-                              (output-html "open"))
-                            '(((output-dvi has-no-display-manager) "dvi2tty")
-                              ((output-dvi style-pstricks) "dvips and gv")
-                              (output-dvi "xdvi")
-                              (output-pdf "xdg-open")
-                              (output-html "xdg-open"))))
-                     ;; to make RefTeX faster for large documents, try these:
-                     (setq reftex-enable-partial-scans t)
-                     (setq reftex-save-parse-info t)
-                     (setq reftex-use-multiple-selection-buffers t)
-                     ;; to integrate with AUCTeX
-                     (setq reftex-plug-into-AUCTeX t)
-                     (setq reftex-ref-style-default-list
-                           '("Hyperref" "Varioref" "Fancyref"))
-                     (add-hook 'LaTeX-mode-hook 'turn-on-reftex)
-                     (setq LaTeX-command "latex -shell-escape")
-                     (setq LaTeX-biblatex-use-Biber t)
-                     (setq bibtex-dialect 'biblatex)
-                     (jao-when-darwin
-                      (jao-exec-path "/usr/local/texlive/2016/bin/x86_64-darwin"))))
-
-      ;; (use-package ebib
+        :init
+        (setq TeX-auto-save t)
+        (setq TeX-parse-self t)
+        (setq TeX-a4-paper t)
+        (setq TeX-auto-local ".tex-auto-local")
+        ;; Preferred view format: dvi, ps, pdf, pdfs
+        (setq TeX-view-format "pdf")
+        (setq-default TeX-master "../main") ; nil to ask
+        (setq TeX-view-program-selection
+              (jao-d-l
+               '((output-dvi "open")
+                 (output-pdf "open")
+                 (output-html "open"))
+               '(((output-dvi has-no-display-manager) "dvi2tty")
+                 ((output-dvi style-pstricks) "dvips and gv")
+                 (output-dvi "xdvi")
+                 (output-pdf "xdg-open")
+                 (output-html "xdg-open"))))
+        ;; to make RefTeX faster for large documents, try these:
+        (setq reftex-enable-partial-scans t)
+        (setq reftex-save-parse-info t)
+        (setq reftex-use-multiple-selection-buffers t)
+        ;; to integrate with AUCTeX
+        (setq reftex-plug-into-AUCTeX t)
+        (setq reftex-ref-style-default-list
+              '("Hyperref" "Varioref" "Fancyref"))
+        (setq LaTeX-command "latex -shell-escape")
+        (setq LaTeX-biblatex-use-Biber t)
+        (setq bibtex-dialect 'biblatex)
+        :config
+        (add-hook 'TeX-after-compilation-finished-functions
+                  #'TeX-revert-document-buffer)
+        (add-hook 'LaTeX-mode-hook 'turn-on-reftex)
+        )
+
+;; (use-package ebib
       ;;  :ensure t
       ;;  :config (setq ebib-bibtex-dialect 'biblatex))
 
@@ -2073,13 +2076,7 @@
         :ensure t
         :after magit
         :init
-        (setq forge-database-file
-              (format "~/.emacs.d/forge-database-%s.sqlite" emacs-major-version)
-              forge-topic-list-limit (cons 25 10))
-        ;; workaround for ghub problems (shoudn't be needed in 27.x)
-        (when (< emacs-major-version 27)
-          (setq gnutls-algorithm-priority "NORMAL:-VERS-TLS1.3")
-          (setq ghub-use-workaround-for-emacs-bug nil))
+        (setq forge-topic-list-limit (cons 25 10))
         :bind (:map forge-topic-mode-map ("M-w" . copy-region-as-kill))
         :config
         (remove-hook 'magit-status-sections-hook #'forge-insert-issues)
@@ -2405,20 +2402,21 @@
         :commands cider-mode
         :init (setq cider-annotate-completion-candidates t
                     cider-auto-select-error-buffer nil
-                    clojure-docstring-fill-column 72
-                    cider-show-error-buffer 'except-in-repl
+                    cider-auto-select-test-report-buffer nil
+                    cider-eldoc-display-for-symbol-at-point t
+                    cider-enrich-classpath t
                     cider-lein-parameters "repl :headless :host localhost"
                     cider-mode-line  " ÷"
                     cider-prompt-for-symbol nil
-                    cider-repl-pop-to-buffer-on-connect nil
                     cider-repl-history-file
                     (expand-file-name "~/.emacs.d/cache/cider.history")
+                    cider-repl-pop-to-buffer-on-connect nil
                     cider-repl-use-pretty-printing t
+                    cider-show-error-buffer 'except-in-repl
                     cider-test-show-report-on-success nil
-                    cider-auto-select-test-report-buffer nil
-                    cider-use-overlays nil
                     cider-use-fringe-indicators nil
-                    cider-eldoc-display-for-symbol-at-point t
+                    cider-use-overlays nil
+                    clojure-docstring-fill-column 72
                     nrepl-prompt-to-kill-server-buffer-on-quit nil))
 
       (with-eval-after-load "cider-test"
@@ -2797,6 +2795,7 @@
         :config
         (define-key global-map (kbd "C-c C-t") telega-prefix-map)
         (setq telega-chat-show-avatars nil
+              telega-chat-prompt-format ">> "
               telega-root-show-avatars nil
               telega-chat-prompt-show-avatar-for nil
               telega-emoji-use-images nil