From 76f0787a03fde26243d0034d3c15c444df5ea69c Mon Sep 17 00:00:00 2001 From: Sean Whitton Date: Thu, 29 Apr 2021 13:01:49 -0700 Subject: CONTINUE-DEPLOY* connections: push a new connection object This is cleaner than resetting certain slot values. Signed-off-by: Sean Whitton --- src/connection.lisp | 9 --------- 1 file changed, 9 deletions(-) (limited to 'src/connection.lisp') diff --git a/src/connection.lisp b/src/connection.lisp index 87f7844..9f71bc7 100644 --- a/src/connection.lisp +++ b/src/connection.lisp @@ -85,15 +85,6 @@ For an example of usage, see the :SUDO connection type.")) :documentation "The name of the remote user."))) -(defun reset-remote-home () - "Clear the cache of the remote user's home directory, uid and name. -Used by implementations of ESTABLISH-CONNECTION which will invalidate the -cached values, such as a connection which forks and then SETUIDs to another -user. Should not be called by properties." - (setf (slot-value *connection* 'remote-home) nil - (slot-value *connection* 'remote-uid) nil - (slot-value *connection* 'remote-user) nil)) - (defclass lisp-connection (connection) ()) (defclass posix-connection (connection) ()) -- cgit v1.2.3