branch: master
commit 5faeb71d5358a0898ec5a5f370b5afab84d6b6f4
Author: rocky <[email protected]>
Commit: rocky <[email protected]>
realgud:cmdbuf-buffers-describe shows field names
---
realgud/common/buffer/command.el | 12 ++++++++++--
realgud/common/lochist.el | 2 +-
2 files changed, 11 insertions(+), 3 deletions(-)
diff --git a/realgud/common/buffer/command.el b/realgud/common/buffer/command.el
index 55c4679..ab1c007 100644
--- a/realgud/common/buffer/command.el
+++ b/realgud/common/buffer/command.el
@@ -140,7 +140,8 @@
(filename)
(remapped-filename)
)
- (insert "** Source Buffers Seen\n")
+ (insert "** Source Buffers Seen (srcbuf-list)\n")
+
(dolist (buffer buffer-list)
(insert " - ")
(put-text-property
@@ -174,7 +175,14 @@ Information is put in an internal buffer called
*Describe*."
(insert "#+STARTUP: showall\n")
;;(insert "#+OPTIONS: H:2 num:nil toc:t \\n:nil ::t |:t
^:nil -:t f:t *:t tex:t d:(HIDE) tags:not-in-toc\n")
(insert (format "#+TITLE: Debugger info for %s\n" cmdbuf-name))
- (insert "** General Information\n")
+ (insert "** General Information (")
+ (insert-text-button
+ "realgud-cmdbuf-info"
+ ;; FIXME figure out how to set buffer to cmdbuf so we get
cmdbuf value
+ 'action '(lambda(button) (describe-variable
'realgud-cmdbuf-info))
+ 'help-echo "mouse-2: help-on-variable")
+ (insert ")\n")
+
(mapc 'insert
(list
(format " - Debugger name ::\t%s\n"
diff --git a/realgud/common/lochist.el b/realgud/common/lochist.el
index 786e8e3..35253c8 100644
--- a/realgud/common/lochist.el
+++ b/realgud/common/lochist.el
@@ -42,7 +42,7 @@
"Format LOC-HIST values inside buffer *Describe*"
(switch-to-buffer (get-buffer-create "*Describe*"))
(org-mode)
- (insert "** Source Positions Stopped At\n")
+ (insert "** Source Positions Stopped at (loc-hist)\n")
(mapc 'insert
(list
(format " - buffer size :: %d\n" realgud-loc-hist-size)
