emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/realgud 6acb987 50/72: Add comments


From: Stefan Monnier
Subject: [elpa] externals/realgud 6acb987 50/72: Add comments
Date: Fri, 26 Mar 2021 22:49:11 -0400 (EDT)

branch: externals/realgud
commit 6acb9872c5efc7b303658674642d94665b15438a
Author: 813 <813gan@protonmail.com>
Commit: 813 <813gan@protonmail.com>

    Add comments
---
 realgud/common/buffer/command.el |  1 +
 realgud/common/buffer/locals.el  | 22 +++++++++++++++++++++-
 realgud/common/locals-mode.el    | 18 ++++++++++++++++++
 3 files changed, 40 insertions(+), 1 deletion(-)

diff --git a/realgud/common/buffer/command.el b/realgud/common/buffer/command.el
index 89baf72..8879708 100644
--- a/realgud/common/buffer/command.el
+++ b/realgud/common/buffer/command.el
@@ -580,6 +580,7 @@ command-process buffer has stored."
   )
 
 (defun realgud-get-info (key &optional opt-buffer)
+  "Convinient function for getting data from realgud-cmdbuf-info."
   (let* ((buffer (or opt-buffer (current-buffer)))
         (cmdbuf (realgud-get-cmdbuf buffer)))
     (if cmdbuf
diff --git a/realgud/common/buffer/locals.el b/realgud/common/buffer/locals.el
index 3c5dae5..8f4aa8f 100644
--- a/realgud/common/buffer/locals.el
+++ b/realgud/common/buffer/locals.el
@@ -1,9 +1,29 @@
+;;; Locals buffer
+
+;; Author: 813gan
+
+;; This program is free software: you can redistribute it and/or
+;; modify it under the terms of the GNU General Public License as
+;; published by the Free Software Foundation, either version 3 of the
+;; License, or (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful, but
+;; WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+;; General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see
+;; <http://www.gnu.org/licenses/>.
+
 (require 'load-relative)
 (require-relative-list
  '("helper") "realgud-")
 (require-relative-list
  '("command") "realgud-buffer-")
 
+;; Local variable for easier buffer identification
+;; "realgud-locals-init" will set it to "'locals"
 (make-variable-buffer-local (defvar realgud-buffer-type))
 
 (cl-defstruct realgud-locals-info
@@ -44,7 +64,7 @@ ARGS - arguments for command"
        (cdr (split-string realgud-track-divert-string "\n" t)) )) ))
 
 (defun realgud-locals-init ()
-  "Create locals buffer."
+  "Create locals buffer and fill it for first time."
   (let ((cmdbuf (realgud-get-cmdbuf)))
     (with-current-buffer-safe cmdbuf
       (let ((locals-buffer (get-buffer-create
diff --git a/realgud/common/locals-mode.el b/realgud/common/locals-mode.el
index b913581..4b3ec81 100644
--- a/realgud/common/locals-mode.el
+++ b/realgud/common/locals-mode.el
@@ -1,3 +1,21 @@
+;;; Locals buffer
+
+;; Author: 813gan
+
+;; This program is free software: you can redistribute it and/or
+;; modify it under the terms of the GNU General Public License as
+;; published by the Free Software Foundation, either version 3 of the
+;; License, or (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful, but
+;; WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+;; General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see
+;; <http://www.gnu.org/licenses/>.
+
 (require 'load-relative)
 (require-relative-list
  '("helper" "buffer/locals") "realgud-")



reply via email to

[Prev in Thread] Current Thread [Next in Thread]