From 4db12d622e103220c0a84f65eaa5f9c0369c40fd Mon Sep 17 00:00:00 2001 From: Jose Antonio Ortega Ruiz Date: Sat, 13 Nov 2010 03:45:07 +0100 Subject: Cleanups Nothing here, move on. --- elisp/geiser-connection.el | 6 +----- 1 file changed, 1 insertion(+), 5 deletions(-) (limited to 'elisp/geiser-connection.el') diff --git a/elisp/geiser-connection.el b/elisp/geiser-connection.el index 0225964..d41110c 100644 --- a/elisp/geiser-connection.el +++ b/elisp/geiser-connection.el @@ -36,16 +36,12 @@ ;;; Request datatype: (defun geiser-con--make-request (con str cont &optional sender-buffer) - (list :geiser-connection-request - (cons :id (geiser-con--connection-inc-count con)) + (list (cons :id (geiser-con--connection-inc-count con)) (cons :string str) (cons :continuation cont) (cons :buffer (or sender-buffer (current-buffer))) (cons :connection con))) -(defsubst geiser-con--request-p (req) - (and (listp req) (eq (car req) :geiser-connection-request))) - (defsubst geiser-con--request-id (req) (cdr (assoc :id req))) -- cgit v1.2.3