summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorYoni Rabkin <yoni@rabkins.net>2020-08-03 18:47:18 -0400
committerYoni Rabkin <yoni@rabkins.net>2020-08-03 18:47:18 -0400
commit1995685feded34f0c70a8b6916fe593249602332 (patch)
tree4225d5cc08c6196fc1e96dc7ad4440cd9be9de08
parentd6441dcee7cfca2541764e654393dfb2b73378aa (diff)
* rt-liberation-rest.el: fix undefined variable
-rw-r--r--rt-liberation-rest.el15
1 files changed, 8 insertions, 7 deletions
diff --git a/rt-liberation-rest.el b/rt-liberation-rest.el
index d9df8d9..9b18974 100644
--- a/rt-liberation-rest.el
+++ b/rt-liberation-rest.el
@@ -20,9 +20,7 @@
;; License along with this program; if not, write to the Free
;; Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
;; MA 02111-1307, USA.
-;;
-;; Note: Licensed under GPLv2+ and not GPLv3+ in order to be
-;; compatible with the license of RT.
+
;;; History:
;;
@@ -56,6 +54,9 @@
(defvar rt-liber-rest-verbose-p t
"If non-nil, be verbose about what's happening.")
+(defvar rt-liber-rest-response-buffer nil
+ "Buffer for manipulating server responses.")
+
(defun rt-liber-rest-write-debug (str)
"Write to debug buffer."
@@ -242,7 +243,7 @@
(defun rt-liber-rest-handle-response (buffer)
"Handle the response provided in BUFFER."
- (with-current-buffer response-buffer
+ (with-current-buffer rt-liber-rest-response-buffer
(rt-liber-rest-write-debug (buffer-string))))
(defun rt-liber-rest-edit-runner (ticket-id field value)
@@ -256,8 +257,8 @@
(rt-liber-rest-write-debug (concat request-data "\n"))
(let ((url-request-method "POST")
(url-request-data request-data)
- response-buffer)
- (setq response-buffer
+ rt-liber-rest-response-buffer)
+ (setq rt-liber-rest-response-buffer
(url-retrieve-synchronously
(rt-liber-rest-command-edit-string
rt-liber-rest-scheme
@@ -265,7 +266,7 @@
ticket-id
rt-liber-rest-username
rt-liber-rest-password)))
- (rt-liber-rest-handle-response response-buffer)))
+ (rt-liber-rest-handle-response rt-liber-rest-response-buffer)))
(message "edit command ended at %s" (current-time-string)))
(defun rt-liber-rest-command-set (id field status)