Compare commits
No commits in common. "6279921553f434018045c103a7dc8fe79e500cbe" and "b9fde435a7287c22c785e7bec2f55c29b4408f69" have entirely different histories.
6279921553
...
b9fde435a7
17
init.el
17
init.el
@ -49,6 +49,12 @@
|
|||||||
|
|
||||||
;; * Packages
|
;; * Packages
|
||||||
|
|
||||||
|
(setq package-archives
|
||||||
|
'(("melpa" . "https://melpa.org/packages/")
|
||||||
|
("gnu" . "https://elpa.gnu.org/packages/")
|
||||||
|
("melpa-stable" . "https://stable.melpa.org/packages/")
|
||||||
|
("nongnu" . "https://elpa.nongnu.org/nongnu/")))
|
||||||
|
|
||||||
(defvar use-package-enable-imenu-support t)
|
(defvar use-package-enable-imenu-support t)
|
||||||
|
|
||||||
(require 'use-package)
|
(require 'use-package)
|
||||||
@ -63,15 +69,8 @@
|
|||||||
use-package-compute-statistics t
|
use-package-compute-statistics t
|
||||||
debug-on-error t))
|
debug-on-error t))
|
||||||
|
|
||||||
(use-package package
|
|
||||||
:init (setq package-archives
|
|
||||||
'(("melpa" . "https://melpa.org/packages/")
|
|
||||||
("gnu" . "https://elpa.gnu.org/packages/")
|
|
||||||
("melpa-stable" . "https://stable.melpa.org/packages/")
|
|
||||||
("nongnu" . "https://elpa.nongnu.org/nongnu/")))
|
|
||||||
:config (progn
|
|
||||||
(add-to-list 'package-pinned-packages '(use-package . "melpa-stable"))
|
(add-to-list 'package-pinned-packages '(use-package . "melpa-stable"))
|
||||||
(add-to-list 'package-pinned-packages '(bind-key . "melpa-stable"))))
|
(add-to-list 'package-pinned-packages '(bind-key . "melpa-stable"))
|
||||||
|
|
||||||
|
|
||||||
;; * Personal Customization Variables
|
;; * Personal Customization Variables
|
||||||
@ -1976,7 +1975,7 @@ Note that this workaround is incomplete, as explained in this comment."
|
|||||||
;; tested with Outlook proper.
|
;; tested with Outlook proper.
|
||||||
|
|
||||||
(define-advice mml-smime-epg-sign (:after (cont) add-crlf-when-pkcs7)
|
(define-advice mml-smime-epg-sign (:after (cont) add-crlf-when-pkcs7)
|
||||||
"If CONT signifies encryption with smime, replace all \\n with \\r\\n."
|
"If CONT signifies encryption with smime, replace all \n with \r\n."
|
||||||
(when (and (eq (car cont) 'part)
|
(when (and (eq (car cont) 'part)
|
||||||
(string= "smime" (or (cdr (assq 'encrypt cont)) "")))
|
(string= "smime" (or (cdr (assq 'encrypt cont)) "")))
|
||||||
(db/convert-lf-to-crlf-in-buffer)))))
|
(db/convert-lf-to-crlf-in-buffer)))))
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user