diff options
| author | Yuchen Pei <id@ypei.org> | 2023-09-07 23:15:32 +1000 |
|---|---|---|
| committer | Yuchen Pei <id@ypei.org> | 2023-09-07 23:15:32 +1000 |
| commit | 6ec968e2cadca7e4df4aba8960e758aa6c7d00b0 (patch) | |
| tree | c080d4738f61eb0ed32258da56f528292a79e65c /emacs/.emacs.d/lisp/my/my-gnus.el | |
| parent | 1622ac38772868d101e48107591db8f4700627c4 (diff) | |
[emacs] Some small enhancement
Remove empty blocks automatically.
When org-insert-structure-template, with a prefix, auto yank into block and exit
Diffstat (limited to 'emacs/.emacs.d/lisp/my/my-gnus.el')
| -rw-r--r-- | emacs/.emacs.d/lisp/my/my-gnus.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/emacs/.emacs.d/lisp/my/my-gnus.el b/emacs/.emacs.d/lisp/my/my-gnus.el index 1f7ff18..9c42204 100644 --- a/emacs/.emacs.d/lisp/my/my-gnus.el +++ b/emacs/.emacs.d/lisp/my/my-gnus.el @@ -339,7 +339,8 @@ The archiving target comes from `my-gnus-group-alist'." url) pairs)) (while (and (shr-next-link) - (<= (point) end)) + (<= (point) end) + (button-at (point))) (let ((button (button-at (point)))) (push (cons (buffer-substring-no-properties (button-start button) |