diff options
| -rw-r--r-- | src/data/pgp.lisp | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/data/pgp.lisp b/src/data/pgp.lisp index 8fb7ca2..6963b53 100644 --- a/src/data/pgp.lisp +++ b/src/data/pgp.lisp @@ -42,7 +42,8 @@ (cadr (data-assoc iden1 iden2 cache))) (extract (iden1 iden2) (update-cache) - (cddr (data-assoc iden1 iden2 cache)))) + (make-instance 'string-data + :string (cddr (data-assoc iden1 iden2 cache))))) (cons #'check #'extract)))) (defun read-store (location) |