From 08d6412163e9162fd012cf63a587f9e5e1d50ac2 Mon Sep 17 00:00:00 2001 From: ueno Date: Mon, 17 Apr 2006 08:16:10 +0000 Subject: [PATCH] Fixed signal args. --- epa-file.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/epa-file.el b/epa-file.el index 574eaed..046997a 100644 --- a/epa-file.el +++ b/epa-file.el @@ -93,7 +93,7 @@ (if (setq entry (assoc file epa-file-passphrase-alist)) (setcdr entry nil)) (signal 'file-error - (cons "Opening input file" (nthcdr 2 error))))) + (cons "Opening input file" (cdr error))))) (if (boundp 'last-coding-system-used) (set-buffer-file-coding-system last-coding-system-used) (set-buffer-file-coding-system default-buffer-file-coding-system)) @@ -138,7 +138,7 @@ If no one is selected, symmetric encryption will be performed. "))))) (error (if (setq entry (assoc file epa-file-passphrase-alist)) (setcdr entry nil)) - (signal 'file-error (cons "Opening output file" (nthcdr 2 error))))) + (signal 'file-error (cons "Opening output file" (cdr error))))) (epa-file-run-real-handler #'write-region (list string nil file append visit lockname mustbenew)) -- 1.7.10.4