diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2021-05-25 17:21:25 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-05-25 17:21:25 -0700 |
commit | 0117130288e5bf7513c4ec8fcfe1259e4cb73957 (patch) | |
tree | d8366bc70489ce2cd82dbf7882798924124aca7e /src/data | |
parent | bee6215fe73e836feb1d49e00ecb960f33465e65 (diff) | |
download | consfigurator-0117130288e5bf7513c4ec8fcfe1259e4cb73957.tar.gz |
DATA.PGP: use WITH-STANDARD-IO-SYNTAX
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src/data')
-rw-r--r-- | src/data/pgp.lisp | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/data/pgp.lisp b/src/data/pgp.lisp index 25d447a..90e046b 100644 --- a/src/data/pgp.lisp +++ b/src/data/pgp.lisp @@ -62,7 +62,9 @@ (defun put-store (location data) (run-program (list "gpg" "--encrypt") - :input (make-string-input-stream (prin1-to-string data)) + :input (make-string-input-stream + (with-standard-io-syntax + (prin1-to-string data))) :output (unix-namestring location))) (defun data-assoc (iden1 iden2 data) |