From: Eshel Yaron <me@eshelyaron.com>
Date: Sun, 17 Sep 2023 07:57:42 +0000 (+0200)
Subject: Update Emacs configuration
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6eca083bc5248e0add1603784f63cfc800b38ccc;p=dotfiles.git

Update Emacs configuration
---

diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index a0af7e6..9b25cfa 100644
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -94,13 +94,6 @@
 (add-hook 'after-init-hook #'elpaca-process-queues)
 (elpaca `(,@elpaca-order))
 
-(with-eval-after-load 'elpaca-info
-  (set-face-attribute 'elpaca-info-package nil
-                      :height nil
-                      :inherit 'info-title-1)
-  (set-face-attribute 'elpaca-info-section nil
-                      :weight nil
-                      :inherit 'bold))
 
 ;;; Install packages
 
@@ -165,12 +158,6 @@
          :repo "https://git.sr.ht/~eshel/openai.el"))
 (elpaca package-lint)
 (elpaca paredit)
-(elpaca (pdf-tools
-         :pre-build (("emacs" "--batch" "-l" "ox-texinfo" "README.org"
-                      "--eval" "(setq org-babel-confirm-evaluate-answer-no t)"
-                      "--eval" "(setq org-export-with-broken-links t)"
-                      "-f" "org-texinfo-export-to-texinfo")
-                     ("mv" "README.texi"  "pdf-tools.texi"))))
 (elpaca rainbow-delimiters)
 (elpaca rainbow-mode)
 (elpaca rg)
@@ -196,12 +183,6 @@
          :repo "https://git.sr.ht/~pkal/do-at-point"
          :pre-build (("pandoc" "-o" "do-at-point.texi" "README.md"))))
 (elpaca rfc-mode)
-(elpaca (auctex
-         :files ("*.el" "*.info*")
-         :pre-build (("./autogen.sh")
-                     ("./configure" "--with-lispdir=." "--with-texmf-dir=/tmp")
-                     ("make")
-                     ("cp" "doc/auctex.info" "doc/auctex.info-1" "doc/auctex.info-2" "doc/preview-latex.info" "."))))
 
 (elpaca-wait)
 
@@ -425,8 +406,6 @@
  display-time-default-load-average nil
  ;; allow disabling confirming before compilation via local variables
  safe-local-variable-values '((compilation-read-command . nil))
- ;; TeX-view-program-selection '((output-pdf "PDF Tools"))
- ;; TeX-source-correlate-start-server t
  xref-show-definitions-function #'consult-xref
  xref-show-xrefs-function       #'consult-xref
  xref-search-program             'ripgrep
@@ -482,12 +461,13 @@
                     :foreground "red")
 (set-face-attribute 'cursor nil
                     :background "salmon")
+(set-face-attribute 'font-lock-doc-face nil
+                    :slant 'italic)
 
 ;;; Add custom code directory to `load-path'
 
 (add-to-list 'load-path (expand-file-name "lisp/" user-emacs-directory))
 (autoload 'some-button "some-button" nil t)
-(autoload 'pdf-view-mode "pdf-view"  nil t)
 
 (add-to-list 'load-path "~/checkouts/esy-publish/")
 (autoload 'esy-publish-setup        "esy-publish"  nil t)
@@ -858,10 +838,14 @@ Interactively, POINT is point and KILL is the prefix argument."
                 display-fill-column-indicator-mode
                 display-line-numbers-mode
                 flymake-mode
-                flyspell-prog-mode
-                rainbow-delimiters-mode))
+                ;; flyspell-prog-mode
+                ))
   (add-hook 'prog-mode-hook mode))
-(add-hook 'lisp-data-mode-hook #'paredit-mode)
+
+(dolist (mode '(paredit-mode
+                rainbow-delimiters-mode))
+  (add-hook 'lisp-data-mode-hook mode))
+
 
 ;;; Extend other standard hooks
 
@@ -1216,12 +1200,6 @@ as the initial input for completion, and return that directory."
 
 ;;; Configure PDF handling
 
-(with-eval-after-load 'pdf-view
-  (require 'pdf-tools))
-(with-eval-after-load 'pdf-tools
-  (pdf-tools-install :no-query)
-  ;; (add-hook 'pdf-view-mode-hook #'pdf-view-midnight-minor-mode)
-  )
 (add-to-list 'revert-without-query "\\.pdf\\'")
 
 ;;; Configure terminal emulation via `vterm'
@@ -1269,7 +1247,6 @@ as the initial input for completion, and return that directory."
                 ("\\.rb\\'"    . ruby-ts-mode)
                 ("\\.rs\\'"    . rust-ts-mode)
                 ("\\.go\\'"    . go-ts-mode)
-                ("\\.pdf\\'"   . pdf-view-mode)
                 ("\\.plt?\\'"  . prolog-mode)))
   (push cell auto-mode-alist))
 
@@ -1380,9 +1357,6 @@ as the initial input for completion, and return that directory."
     (apply fun args)
     (indent-according-to-mode)))
 
-(with-eval-after-load 'tex
-  (setq TeX-view-program-selection '((output-pdf "PDF Tools"))))
-
 ;;; Track currency exchange rates
 
 (defvar esy/eur-to-ils-rates nil)
diff --git a/.gitignore b/.gitignore
index d70b289..aa6f6fb 100644
--- a/.gitignore
+++ b/.gitignore
@@ -26,3 +26,4 @@
 /.emacs.d/esy.el
 /.emacs.d/etc/
 /Brewfile.lock.json
+/*~