sqrtminusone/dotfiles
1
0
Fork 0
mirror of https://github.com/SqrtMinusOne/dotfiles.git synced 2025-12-10 19:23:03 +03:00
Code Issues Projects Releases Packages Wiki Activity Actions

emacs: fix accents

Browse source
This commit is contained in:
Pavel Korytov 2024-08-25 23:37:53 +03:00
parent e2097bb665
commit 5aa893e508
2 changed files with 2 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
.emacs.d/init.el
View file

@ -584,6 +584,7 @@ then it takes a second \\[keyboard-quit] to abort the minibuffer."
(defun my/accent (arg) (defun my/accent (arg)
(interactive "P") (interactive "P")
(require 'accent)
(message "%s" arg) (message "%s" arg)
(let* ((after? (eq accent-position 'after)) (let* ((after? (eq accent-position 'after))
(char (if after? (char-after) (char-before))) (char (if after? (char-after) (char-before)))

1
Emacs.org
View file

@ -1051,6 +1051,7 @@ Input accented characters.
(defun my/accent (arg) (defun my/accent (arg)
(interactive "P") (interactive "P")
(require 'accent)
(message "%s" arg) (message "%s" arg)
(let* ((after? (eq accent-position 'after)) (let* ((after? (eq accent-position 'after))
(char (if after? (char-after) (char-before))) (char (if after? (char-after) (char-before)))