aboutsummaryrefslogtreecommitdiff
path: root/src/data
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2021-05-25 17:21:25 -0700
committerSean Whitton <spwhitton@spwhitton.name>2021-05-25 17:21:25 -0700
commit0117130288e5bf7513c4ec8fcfe1259e4cb73957 (patch)
treed8366bc70489ce2cd82dbf7882798924124aca7e /src/data
parentbee6215fe73e836feb1d49e00ecb960f33465e65 (diff)
downloadconsfigurator-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.lisp4
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)