Index: lisp/epa-file.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/epa-file.el,v
retrieving revision 1.7
diff -r1.7 epa-file.el
127,135c127,132
<   ;; (save-match-data
<   ;;   (let ((op (get operation 'epa-file)))
<   ;;     (if (and op
<   ;; 	       (if (and (eq operation 'insert-file-contents)
< 			
<   ;; 			(y-or-n-p ""
<   ;; 	  (apply op args)
<   ;; 	(epa-file-run-real-handler operation args)))))
<   nil)
---
>   (save-match-data
>     (let ((op (get operation 'epa-file)))
>       (if op
>   	  (apply op args)
>   	(epa-file-run-real-handler operation args)))))
>