Skip to content
Browse files

Added RECONNECT.

Also exported lower-level *CONNECTION*, OPEN-CONNECTION and CLOSE-CONNECTION to allow for more fine-grained connection control from client code.
  • Loading branch information...
1 parent dbfa5b4 commit 288a34f7b29243e9d35d34203284d22007727988 @vseloved committed
Showing with 10 additions and 1 deletion.
  1. +1 −1 cl-redis.asd
  2. +5 −0 connection.lisp
  3. +4 −0 package.lisp
View
2 cl-redis.asd
@@ -5,7 +5,7 @@
(defsystem #:cl-redis
:name "Redis client"
- :version '(1 1 3)
+ :version '(1 2 0)
:maintainer "Vsevolod Dyomkin <vseloved@gmail.com>"
:licence "MIT"
:description "A Redis database interface through socket"
View
5 connection.lisp
@@ -167,4 +167,9 @@ connection. If connection is already established, reuse it."
(close-connection *connection*)
(setf *connection* nil))
+(defun reconnect ()
+ "Close and re-open the connection to Redis server."
+ (close-connection *connection*)
+ (open-connection *connection*))
+
;;; end
View
4 package.lisp
@@ -12,6 +12,10 @@
#:connect
#:disconnect
+ #:reconnect
+ #:*connection*
+ #:open-connection
+ #:close-connection
#:connected-p
#:with-connection
#:with-recursive-connection

0 comments on commit 288a34f

Please sign in to comment.
Something went wrong with that request. Please try again.