diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2021-03-27 16:45:33 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-03-27 17:04:28 -0700 |
commit | 563ecad0707ff24709e87e7c2fee4d86e5d33444 (patch) | |
tree | edcbd0521311c3cd97966d24be65e276dd1a72b4 /src/data.lisp | |
parent | bbf1e525bcefddf079f78da23639d40a71b5db00 (diff) | |
download | consfigurator-563ecad0707ff24709e87e7c2fee4d86e5d33444.tar.gz |
convert "upload to root Lisp" error into a warning
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src/data.lisp')
-rw-r--r-- | src/data.lisp | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/src/data.lisp b/src/data.lisp index 52bc652..b6feb34 100644 --- a/src/data.lisp +++ b/src/data.lisp @@ -254,11 +254,6 @@ calling CONTINUE-DEPLOY* or CONTINUE-DEPLOY*-PROGRAM will need their own implementation.")) (defmethod connection-upload ((connection connection) (data data)) - (when (subtypep (class-of connection) - 'consfigurator.connection.local:local-connection) - (error - "Attempt to upload data to the root Lisp or reupload to remote Lisp. -This is not allowed for security reasons.")) (flet ((upload (from to) (with-open-file (stream from :element-type '(unsigned-byte 8)) (writefile to stream)))) |