[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/epa-file.el,v
From: |
Dan Nicolaescu |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/epa-file.el,v |
Date: |
Sun, 27 Apr 2008 20:53:35 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Changes by: Dan Nicolaescu <dann> 08/04/27 20:53:34
Index: epa-file.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/epa-file.el,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -b -r1.6 -r1.7
--- epa-file.el 27 Apr 2008 19:49:15 -0000 1.6
+++ epa-file.el 27 Apr 2008 20:53:34 -0000 1.7
@@ -124,15 +124,15 @@
(epa-passphrase-callback-function context key-id nil)))
(defun epa-file-handler (operation &rest args)
- (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)))))
-
+ ;; (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)
(defun epa-file-run-real-handler (operation args)
(let ((inhibit-file-name-handlers
(cons 'epa-file-handler