diff options
Diffstat (limited to 'src/connection/local.lisp')
| -rw-r--r-- | src/connection/local.lisp | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/connection/local.lisp b/src/connection/local.lisp index 4bd272e..6645178 100644 --- a/src/connection/local.lisp +++ b/src/connection/local.lisp @@ -45,6 +45,9 @@ root Lisp is running on, as the root Lisp's uid.")) (defmethod connection-readfile ((connection local-connection) path) (read-file-string path)) +(defmethod connection-readfile-and-remove ((connection local-connection) path) + (prog1 (read-file-string path) (delete-file path))) + (defmethod connection-writefile ((connection local-connection) path content |