diff options
| author | Yuchen Pei <id@ypei.org> | 2023-10-03 22:36:07 +1100 |
|---|---|---|
| committer | Yuchen Pei <id@ypei.org> | 2023-10-03 22:36:07 +1100 |
| commit | a696cbe0f1d96e2ac6a3454d716326f20312a4a8 (patch) | |
| tree | 00829eee3664dc5ccb78fac0eb8c31f7bd6422e3 /emacs | |
| parent | db6947bd8bc2ce9f390341b4849f547b774ed407 (diff) | |
[emacs] some minor changes
Diffstat (limited to 'emacs')
| -rw-r--r-- | emacs/.emacs.d/init/ycp-editing.el | 1 | ||||
| -rw-r--r-- | emacs/.emacs.d/init/ycp-gnus.el | 1 | ||||
| -rw-r--r-- | emacs/.emacs.d/init/ycp-prog.el | 4 |
3 files changed, 6 insertions, 0 deletions
diff --git a/emacs/.emacs.d/init/ycp-editing.el b/emacs/.emacs.d/init/ycp-editing.el index 65189de..e469097 100644 --- a/emacs/.emacs.d/init/ycp-editing.el +++ b/emacs/.emacs.d/init/ycp-editing.el @@ -41,6 +41,7 @@ (setq window-divider-default-places 'bottom-only) ;; don't interpret C-m as RET (define-key input-decode-map [?\C-m] [C-m]) +(define-key input-decode-map [?\C-i] [C-i]) (setq save-place-file (locate-user-emacs-file "saveplace")) (my-configure diff --git a/emacs/.emacs.d/init/ycp-gnus.el b/emacs/.emacs.d/init/ycp-gnus.el index 4e40603..e4e24a4 100644 --- a/emacs/.emacs.d/init/ycp-gnus.el +++ b/emacs/.emacs.d/init/ycp-gnus.el @@ -150,6 +150,7 @@ "n" #'my-gnus-summary-next-article-like-mu4e "p" #'my-gnus-summary-prev-article-like-mu4e "q" #'my-gnus-summary-exit-like-mu4e + "g" #'gnus-group-get-new-news-this-group "M-u" nil "M-&" nil "M" #'my-gnus-move-article-like-mu4e diff --git a/emacs/.emacs.d/init/ycp-prog.el b/emacs/.emacs.d/init/ycp-prog.el index 78bdd88..6696aaf 100644 --- a/emacs/.emacs.d/init/ycp-prog.el +++ b/emacs/.emacs.d/init/ycp-prog.el @@ -271,6 +271,10 @@ "C-<left>" nil "C-<right>" nil "M-?" nil + ;; we want to reserve M-r to `previous-matching-history-element' + ;; when in minibuffer and ielm + "M-r" nil + "M-i" #'paredit-raise-sexp "C-j" nil ;not ideal, we just want to unshadow it in lisp-interaction-mode "<RET>" #'paredit-newline "M-s" nil |