From c442e9169b3dfbbaba7fa2f13a590a383706c7f7 Mon Sep 17 00:00:00 2001 From: Thomas Schneider Date: Wed, 8 Jul 2020 14:04:20 +0200 Subject: Emacs/calc: Use keypad comma as decimal separator --- dot.emacs.d/init.el | 3 +++ 1 file changed, 3 insertions(+) (limited to 'dot.emacs.d') diff --git a/dot.emacs.d/init.el b/dot.emacs.d/init.el index 9f370ce..94cf1e3 100644 --- a/dot.emacs.d/init.el +++ b/dot.emacs.d/init.el @@ -268,6 +268,9 @@ (add-hook 'text-mode-hook #'turn-on-auto-fill) +;; Use keypad comma as decimal separator +(define-key calc-digit-map (kbd ") ".") + ;;; Mail (use-package gnus :config -- cgit v1.2.3 From 9d39d9eb27aba7b60451c59a21d947c129edc461 Mon Sep 17 00:00:00 2001 From: Thomas Schneider Date: Sun, 26 Jul 2020 18:57:47 +0200 Subject: Emacs: Fix calc-digit-map handling --- dot.emacs.d/init.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'dot.emacs.d') diff --git a/dot.emacs.d/init.el b/dot.emacs.d/init.el index 94cf1e3..1db31ca 100644 --- a/dot.emacs.d/init.el +++ b/dot.emacs.d/init.el @@ -269,7 +269,9 @@ (add-hook 'text-mode-hook #'turn-on-auto-fill) ;; Use keypad comma as decimal separator -(define-key calc-digit-map (kbd ") ".") +(use-package calc + :config + (define-key calc-digit-map (kbd "") ".")) ;;; Mail (use-package gnus -- cgit v1.2.3 From 9482030c489149b9d2a7fa4d54f05b13f954eacc Mon Sep 17 00:00:00 2001 From: Thomas Schneider Date: Sun, 26 Jul 2020 18:59:17 +0200 Subject: Emacs: Refactor RefTeX/AUCTeX config --- dot.emacs.d/init.el | 16 +++++++++++++--- 1 file changed, 13 insertions(+), 3 deletions(-) (limited to 'dot.emacs.d') diff --git a/dot.emacs.d/init.el b/dot.emacs.d/init.el index 1db31ca..1279a02 100644 --- a/dot.emacs.d/init.el +++ b/dot.emacs.d/init.el @@ -217,11 +217,12 @@ (add-hook 'mail-mode-hook #'turn-on-auto-fill) (add-hook 'mail-mode-hook #'mail-text) +(defun qsx-enable-TeX-fold-mode () + (TeX-fold-mode 1)) + (use-package tex :if (display-graphic-p) :ensure auctex - :init - (setq reftex-plug-into-AUCTeX t) :config (setq TeX-auto-save nil TeX-parse-self t @@ -229,7 +230,16 @@ font-latex-fontify-sectioning 'color font-latex-fontify-script 'multi-level fill-column 80) - (add-hook 'TeX-mode-hook #'turn-on-auto-fill)) + (dolist (f '(qsx-enable-TeX-fold-mode + turn-on-auto-fill + prettify-symbols-mode)) + (add-hook 'TeX-mode-hook f))) + +(use-package reftex + :if (display-graphic-p) + :config + (setq reftex-plug-into-AUCTeX t) + (add-hook 'TeX-mode-hook #'reftex-mode)) (use-package auctex-latexmk :if (display-graphic-p) -- cgit v1.2.3 From 18ad8837e1a5475a2db1d1ea1f02034fedbf043b Mon Sep 17 00:00:00 2001 From: Thomas Schneider Date: Sun, 26 Jul 2020 19:20:26 +0200 Subject: Emacs: Add some packages and config --- dot.emacs.d/init.el | 15 +++++++++++++++ 1 file changed, 15 insertions(+) (limited to 'dot.emacs.d') diff --git a/dot.emacs.d/init.el b/dot.emacs.d/init.el index 1279a02..526f728 100644 --- a/dot.emacs.d/init.el +++ b/dot.emacs.d/init.el @@ -278,6 +278,21 @@ (add-hook 'text-mode-hook #'turn-on-auto-fill) +(use-package json-mode) + +(use-package adoc-mode) + +(use-package dpkg-dev-el + ;; In Debian, it’s provided by a debian package, no need to install from MELPA + :if (not (file-exists-p "/etc/debian_version"))) + +(use-package haskell-mode) + +(use-package ledger-mode + :config + (setq ledger-default-date-format "%Y-%m-%d" + ledger-use-iso-dates t)) + ;; Use keypad comma as decimal separator (use-package calc :config -- cgit v1.2.3 From 8aea364680d4a381ffb5fb9e9cae5be635915d1a Mon Sep 17 00:00:00 2001 From: Thomas Schneider Date: Tue, 13 Jul 2021 18:23:22 +0200 Subject: Emacs: Ignore native-compiled lisp cache --- dot.emacs.d/.gitignore | 1 + 1 file changed, 1 insertion(+) (limited to 'dot.emacs.d') diff --git a/dot.emacs.d/.gitignore b/dot.emacs.d/.gitignore index 5c52875..368c9cc 100644 --- a/dot.emacs.d/.gitignore +++ b/dot.emacs.d/.gitignore @@ -13,3 +13,4 @@ /.lsp-session-v1 /abbrev_defs /elpy +/eln-cache -- cgit v1.2.3 From 8ee5e4161e090a89dc1af0ea35fe895a72d399dd Mon Sep 17 00:00:00 2001 From: Thomas Schneider Date: Tue, 13 Jul 2021 18:23:39 +0200 Subject: Emacs: Set use-package-verbose --- dot.emacs.d/init.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'dot.emacs.d') diff --git a/dot.emacs.d/init.el b/dot.emacs.d/init.el index 526f728..727f286 100644 --- a/dot.emacs.d/init.el +++ b/dot.emacs.d/init.el @@ -9,7 +9,8 @@ (package-refresh-contents) (package-install 'use-package t)) (require 'use-package) -(setq use-package-always-ensure t) +(setq use-package-always-ensure t + use-package-verbose t) (defvar --backup-directory (concat user-emacs-directory "backups")) (if (not (file-exists-p --backup-directory)) -- cgit v1.2.3 From ea1e5beac96ab839dc99b71e5d3dda9468a1752a Mon Sep 17 00:00:00 2001 From: Thomas Schneider Date: Tue, 13 Jul 2021 18:24:07 +0200 Subject: Emacs: Tidy backup-directory-alist handling --- dot.emacs.d/init.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'dot.emacs.d') diff --git a/dot.emacs.d/init.el b/dot.emacs.d/init.el index 727f286..7dfe26d 100644 --- a/dot.emacs.d/init.el +++ b/dot.emacs.d/init.el @@ -12,10 +12,10 @@ (setq use-package-always-ensure t use-package-verbose t) -(defvar --backup-directory (concat user-emacs-directory "backups")) -(if (not (file-exists-p --backup-directory)) - (make-directory --backup-directory t)) -(setq backup-directory-alist `(("." . ,--backup-directory))) +(let ((--backup-directory (concat user-emacs-directory "backups"))) + (unless (file-exists-p --backup-directory) + (make-directory --backup-directory t)) + (setq backup-directory-alist `(("." . ,--backup-directory)))) (setq make-backup-files t ; backup of a file the first time it is saved. backup-by-copying t ; don't clobber symlinks version-control t ; version numbers for backup files -- cgit v1.2.3 From 85238aa8eb6385ea33630e4c51648aaa2b86e32a Mon Sep 17 00:00:00 2001 From: Thomas Schneider Date: Tue, 13 Jul 2021 18:25:13 +0200 Subject: Emacs: Don’t make backups from auto-save-list files MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- dot.emacs.d/init.el | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'dot.emacs.d') diff --git a/dot.emacs.d/init.el b/dot.emacs.d/init.el index 7dfe26d..993efcd 100644 --- a/dot.emacs.d/init.el +++ b/dot.emacs.d/init.el @@ -27,6 +27,15 @@ auto-save-timeout 20 ; number of seconds idle time before auto-save (default: 30) auto-save-interval 200 ; number of keystrokes between auto-saves (default: 300) ) +(defun qsx-backup-enable-predicate (name) + (let ((directory (file-name-directory (file-truename (expand-file-name name)))) + (auto-save-list-directory + (file-name-as-directory + (file-truename (expand-file-name "auto-save-list" user-emacs-directory))))) + (if (string= directory auto-save-list-directory) + nil + (normal-backup-enable-predicate name)))) +(setq backup-enable-predicate #'qsx-backup-enable-predicate) (let ((default-directory (concat user-emacs-directory -- cgit v1.2.3 From 1b202ed34445707a7c419df4971276f31be1930d Mon Sep 17 00:00:00 2001 From: Thomas Schneider Date: Tue, 13 Jul 2021 18:25:52 +0200 Subject: Emacs: Remove salt-mode --- dot.emacs.d/init.el | 2 -- 1 file changed, 2 deletions(-) (limited to 'dot.emacs.d') diff --git a/dot.emacs.d/init.el b/dot.emacs.d/init.el index 993efcd..28c1fdf 100644 --- a/dot.emacs.d/init.el +++ b/dot.emacs.d/init.el @@ -188,8 +188,6 @@ (show-paren-mode 1) -(use-package salt-mode) - (use-package ansible) (use-package poly-ansible) -- cgit v1.2.3 From 1a10699f9b9f788c4e521530d8fa320baa25985f Mon Sep 17 00:00:00 2001 From: Thomas Schneider Date: Tue, 13 Jul 2021 18:26:07 +0200 Subject: Emacs: Don’t ensure AUCTeX packages MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- dot.emacs.d/init.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'dot.emacs.d') diff --git a/dot.emacs.d/init.el b/dot.emacs.d/init.el index 28c1fdf..fe7eb97 100644 --- a/dot.emacs.d/init.el +++ b/dot.emacs.d/init.el @@ -78,6 +78,7 @@ company-backends))))) (use-package company-auctex :if (display-graphic-p) + :ensure nil :config (company-auctex-init)) (use-package company-bibtex :if (display-graphic-p) @@ -230,7 +231,7 @@ (use-package tex :if (display-graphic-p) - :ensure auctex + :ensure nil :config (setq TeX-auto-save nil TeX-parse-self t @@ -251,6 +252,7 @@ (use-package auctex-latexmk :if (display-graphic-p) + :ensure nil :config (auctex-latexmk-setup) (setq TeX-command-default "LatexMk")) -- cgit v1.2.3 From df88b2c24cccf35dbd5da767b86fdfc39d08c55e Mon Sep 17 00:00:00 2001 From: Thomas Schneider Date: Tue, 13 Jul 2021 18:26:55 +0200 Subject: Emacs/Gnus: Forward messages as MIME --- dot.emacs.d/init.el | 1 + 1 file changed, 1 insertion(+) (limited to 'dot.emacs.d') diff --git a/dot.emacs.d/init.el b/dot.emacs.d/init.el index fe7eb97..59d6f5a 100644 --- a/dot.emacs.d/init.el +++ b/dot.emacs.d/init.el @@ -316,6 +316,7 @@ message-sendmail-envelope-from 'header message-send-mail-function 'message-send-mail-with-sendmail message-elide-ellipsis "[…]" + message-forward-as-mime t ;; message-alternative-emails message-confirm-send t mail-user-agent 'gnus-user-agent -- cgit v1.2.3 From 10d91492ce11ac07a18efd7ace26b856be507c01 Mon Sep 17 00:00:00 2001 From: Thomas Schneider Date: Tue, 13 Jul 2021 18:27:59 +0200 Subject: Emacs/Gnus: Change Openpgp header URL to keys.openpgp.org --- dot.emacs.d/init.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'dot.emacs.d') diff --git a/dot.emacs.d/init.el b/dot.emacs.d/init.el index 59d6f5a..f56523e 100644 --- a/dot.emacs.d/init.el +++ b/dot.emacs.d/init.el @@ -344,7 +344,7 @@ nnir-notmuch-program "/home/qsx/.local/bin/notmuch-gnus" nnir-notmuch-remove-prefix (concat (getenv "HOME") "/.nnmaildir/")) (add-hook 'message-setup-hook (defun qsx-message-add-my-headers () - (message-add-header "Openpgp: id=E384009D3B54DCD321BF953295EE94A432583DB1; url=https://pgp.mit.edu/pks/lookup?op=get&search=0x95EE94A432583DB1; preference=signencrypt")))) + (message-add-header "Openpgp: id=E384009D3B54DCD321BF953295EE94A432583DB1; url=https://keys.openpgp.org/vks/v1/by-fingerprint/E384009D3B54DCD321BF953295EE94A432583DB1; preference=signencrypt")))) (use-package gnus-alias :ensure t -- cgit v1.2.3