aboutsummaryrefslogtreecommitdiff
path: root/emacs/.emacs.d/lisp/my
diff options
context:
space:
mode:
authorYuchen Pei <id@ypei.org>2023-10-11 22:38:03 +1100
committerYuchen Pei <id@ypei.org>2023-10-11 22:38:03 +1100
commitad1cdc1f55bf90f635365b728b91888edf31fa6e (patch)
treece717e93afadd10b38481756c500c91e6a207269 /emacs/.emacs.d/lisp/my
parent24cc28936e9366e70ed89cc5ddc560b886d25d8b (diff)
[emacs] [gdb] Some minor changes
- emacs: my-elide-region that does the same thing as message-elide-region, with the comment-start as the prefix - gdbinit: an alias to a command that displays all backtrace of all threads
Diffstat (limited to 'emacs/.emacs.d/lisp/my')
-rw-r--r--emacs/.emacs.d/lisp/my/my-editing.el11
1 files changed, 11 insertions, 0 deletions
diff --git a/emacs/.emacs.d/lisp/my/my-editing.el b/emacs/.emacs.d/lisp/my/my-editing.el
index b24103f..19043ff 100644
--- a/emacs/.emacs.d/lisp/my/my-editing.el
+++ b/emacs/.emacs.d/lisp/my/my-editing.el
@@ -508,5 +508,16 @@ With an prefix-arg, copy the file name relative to project root."
(forward-comment 1)
(point))))))
+(defun my-elide-region (b e)
+ (interactive "r")
+ (let ((message-elide-ellipsis (concat comment-start
+ " [... %l lines elided]
+")))
+ (message-elide-region b e)))
+
+(defun my-replace-no-filter (old-fun &rest r)
+ (let ((search-invisible t))
+ (apply old-fun r)))
+
(provide 'my-editing)
;;; my-editing.el ends here