<?xml version="1.0"?>
<paste-with-annotations>
  <paste>
    <number>
      <integer>16485</integer>
    </number>
    <user>
      <string>anaran</string>
    </user>
    <title>
      <string>My crypt++ settings in .emacs</string>
    </title>
    <contents>
      <string>;;; APA:
;;; crypt is already loaded by sample.init.el, therefor we have to
;;; force loading crypt++ and rebuild the tables here!
(setq crypt-encryption-type 'gpg
      ;; Won't work!
      crypt-encryption-file-extension &quot;\\.gpg\\(\\.~[.0-9]+~\\)?$&quot;
      ;; crypt-encryption-file-extension nil
      crypt-encrypted-disable-auto-save t
      crypt-encoded-disable-auto-save nil
      crypt-bind-insert-file nil
      crypt-decode-dos-p nil
      crypt-decode-mac-p nil
      crypt-freeze-vs-fortran nil)
;;; FIXME: this is awkward, but I don't have time to think about this
;;; (2004-03-30):
(if (locate-library &quot;crypt++&quot;)
    (load &quot;crypt++&quot;))
(crypt-rebuild-tables)
(crypt-bind-insert-file)
;; Needed, since setting crypt-encryption-file-extension in setq above
;; won't work.
(modify-coding-system-alist 'file &quot;\\.gpg\\(\\.~[.0-9]+~\\)?$&quot; 'binary)
; Cannot read in encrypted files without following line:
(modify-coding-system-alist 'process &quot;gpg&quot; 'binary)
; Cannot perform M-x ediff-revision on encrypted files without
; following line:

(setq crypt-auto-write-buffer t)
(setq crypt-no-extension-implies-plain nil)
</string>
    </contents>
    <universal-time>
      <integer>3348165186</integer>
    </universal-time>
    <channel>
      <string>#xemacs</string>
    </channel>
    <colorization-mode>
      <string></string>
    </colorization-mode>
    <maybe-spam>
      <null/>
    </maybe-spam>
    <is-unicode>
      <null/>
    </is-unicode>
    <deletion-requested>
      <null/>
    </deletion-requested>
    <deletion-requested-email>
      <string>bcfbau@tmnsvq.com</string>
    </deletion-requested-email>
    <expiration-time>
      <null/>
    </expiration-time>
  </paste>
  <annotation>
    <number>
      <integer>1</integer>
    </number>
    <user>
      <string>anaran</string>
    </user>
    <title>
      <string>correction</string>
    </title>
    <contents>
      <string>I forgot the crucial line after following comment on the original paste:

; Cannot perform M-x ediff-revision on encrypted files without
; following line:
(modify-coding-system-alist 'process &quot;cvs&quot; 'binary)

This is useful for CVS controlled gpg files, of which I have a few.

Adrian
</string>
    </contents>
    <universal-time>
      <integer>3348166047</integer>
    </universal-time>
    <channel>
      <string>#xemacs</string>
    </channel>
    <colorization-mode>
      <string></string>
    </colorization-mode>
    <maybe-spam>
      <null/>
    </maybe-spam>
    <is-unicode>
      <null/>
    </is-unicode>
    <deletion-requested>
      <null/>
    </deletion-requested>
    <deletion-requested-email>
      <null/>
    </deletion-requested-email>
    <expiration-time>
      <null/>
    </expiration-time>
  </annotation>
</paste-with-annotations>
