aboutsummaryrefslogtreecommitdiff
path: root/src/connection.lisp
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2021-04-29 13:01:49 -0700
committerSean Whitton <spwhitton@spwhitton.name>2021-04-30 17:46:39 -0700
commit76f0787a03fde26243d0034d3c15c444df5ea69c (patch)
tree288706fb111a3a65fa3490d97cb1c5e02fdba77e /src/connection.lisp
parent844818aa56e9ed75b9600f5ef6e833bb5fdacaca (diff)
downloadconsfigurator-76f0787a03fde26243d0034d3c15c444df5ea69c.tar.gz
CONTINUE-DEPLOY* connections: push a new connection object
This is cleaner than resetting certain slot values. Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src/connection.lisp')
-rw-r--r--src/connection.lisp9
1 files changed, 0 insertions, 9 deletions
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) ())