Add interactive command realgud:cmdbuf-associate to associate a source-code buffer...

diff --git a/realgud/common/buffer/source.el b/realgud/common/buffer/source.el
index 6cb3df04c4063027db50b2a0f3bbcb09d6a5bc4b..b4a585e393e35eadc32b4a58a39917383d02f7ec 100644 (file)
--- a/realgud/common/buffer/source.el
+++ b/realgud/common/buffer/source.el
@@ -117,6 +117,14 @@ in it with those from CMDPROC-BUFFER"
        (realgud-srcbuf-info-cmdproc= cmdproc-buffer)
       (realgud-srcbuf-init src-buffer cmdproc-buffer))))
 
+(defun realgud:cmdbuf-associate(cmdbuf-name)
+"Associate a command buffer with for the current buffer which is
+assumed to be a source-code buffer"
+  (interactive "brealgud command buffer: ")
+  (realgud-srcbuf-init-or-update (current-buffer) (get-buffer cmdbuf-name))
+  (realgud-short-key-mode)
+  )
+
 (defun realgud-srcbuf-bp-list(&optional buffer)
   "Return a list of breakpoint loc structures that reside in
 BUFFER which should be an initialized source buffer."