diff --git a/enchive-mode.el b/enchive-mode.el
index f6f1272..89bdb1c 100644
--- a/enchive-mode.el
+++ b/enchive-mode.el
@@ -24,7 +24,7 @@
   (let ((file-name-handler-alist ()))
     (cond ((eq operation 'insert-file-contents)
            (let ((file (car args)))
-             (unless (= 0 (call-process "enchive" file t nil
+             (unless (= 0 (call-process "enchive" file '(t nil) nil
                                         "--pinentry" "extract"))
                (error "Enchive subprocess failed"))
              (setf buffer-file-name file)