Gnus development mailing list
 help / color / mirror / Atom feed
* [PATCH] gnus-sync.el (gnus-sync-file-encrypt-to): Set epa-file-encrypt-to from variable to avoid querying
@ 2012-10-26 17:08 Philipp Haselwarter
  2012-12-22 20:03 ` Ted Zlatanov
  0 siblings, 1 reply; 2+ messages in thread
From: Philipp Haselwarter @ 2012-10-26 17:08 UTC (permalink / raw)
  To: ding

[-- Attachment #1: Type: text/plain, Size: 265 bytes --]

Without this patch, `gnus-sync-save' asks which public key to use to
encrypt `gnus-sync-backend' for on every save.

 lisp/gnus-sync.el | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/lisp/gnus-sync.el b/lisp/gnus-sync.el
index 510e858..4bcec84 100644


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: Type: text/x-patch, Size: 1017 bytes --]

--- a/lisp/gnus-sync.el
+++ b/lisp/gnus-sync.el
@@ -142,6 +142,11 @@ and `gnus-topic-alist'.  Also see `gnus-variable-list'."
 (defvar gnus-sync-newsrc-loader nil
   "Carrier for newsrc data")
 
+(defcustom gnus-sync-file-encrypt-to nil
+  "If non-nil, `epa-file-encrypt-to' is set from this for encrypting the Sync
+  file."
+  :group 'gnus-sync)
+
 (defcustom gnus-sync-lesync-name (system-name)
   "The LeSync name for this machine."
   :group 'gnus-sync
@@ -757,6 +762,9 @@ With a prefix, FORCE is set and all groups will be saved."
         (progn
           (let ((coding-system-for-write gnus-ding-file-coding-system)
                 (standard-output (current-buffer)))
+            (when gnus-sync-file-encrypt-to
+              (set (make-local-variable 'epa-file-encrypt-to)
+                   gnus-sync-file-encrypt-to))
             (princ (format ";; -*- mode:emacs-lisp; coding: %s; -*-\n"
                            gnus-ding-file-coding-system))
             (princ ";; Gnus sync data v. 0.0.1\n")

[-- Attachment #3: Type: text/plain, Size: 26 bytes --]



-- 
Philipp Haselwarter

^ permalink raw reply	[flat|nested] 2+ messages in thread

* Re: [PATCH] gnus-sync.el (gnus-sync-file-encrypt-to): Set epa-file-encrypt-to from variable to avoid querying
  2012-10-26 17:08 [PATCH] gnus-sync.el (gnus-sync-file-encrypt-to): Set epa-file-encrypt-to from variable to avoid querying Philipp Haselwarter
@ 2012-12-22 20:03 ` Ted Zlatanov
  0 siblings, 0 replies; 2+ messages in thread
From: Ted Zlatanov @ 2012-12-22 20:03 UTC (permalink / raw)
  To: ding

On Fri, 26 Oct 2012 19:08:03 +0200 Philipp Haselwarter <philipp@haselwarter.org> wrote: 

PH> Without this patch, `gnus-sync-save' asks which public key to use to
PH> encrypt `gnus-sync-backend' for on every save.

Applied.  Sorry for the delay.

Ted




^ permalink raw reply	[flat|nested] 2+ messages in thread

end of thread, other threads:[~2012-12-22 20:03 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2012-10-26 17:08 [PATCH] gnus-sync.el (gnus-sync-file-encrypt-to): Set epa-file-encrypt-to from variable to avoid querying Philipp Haselwarter
2012-12-22 20:03 ` Ted Zlatanov

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).