[elpa] master 5faeb71 09/56: realgud:cmdbuf-buffers-describe shows field names

[Rocky Bernstein]

branch: master
commit 5faeb71d5358a0898ec5a5f370b5afab84d6b6f4
Author: rocky <address@hidden>
Commit: rocky <address@hidden>

    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)