Actually use enchive-program-name (#11)

2018-01-27 17:14:20 -05:00 · 2018-01-27 17:14:20 -05:00 · 12d9ae9613
parent 973fd66282
commit 12d9ae9613
1 changed files with 1 additions and 1 deletions
--- 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) nil
+             (unless (= 0 (call-process enchive-program-name file '(t nil) nil
                                        "--pinentry" "--agent" "extract"))
               (error "Enchive subprocess failed"))
             (setf buffer-file-name file)