Fixed signal args.
authorueno <ueno>
Mon, 17 Apr 2006 08:16:10 +0000 (08:16 +0000)
committerueno <ueno>
Mon, 17 Apr 2006 08:16:10 +0000 (08:16 +0000)
epa-file.el

index 574eaed..046997a 100644 (file)
@@ -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))