|
@@ -174,7 +174,7 @@ See `org-crypt-disable-auto-save'."
|
|
(org-back-to-heading t)
|
|
(org-back-to-heading t)
|
|
(setq-local epg-context (epg-make-context nil t t))
|
|
(setq-local epg-context (epg-make-context nil t t))
|
|
(let ((start-heading (point)))
|
|
(let ((start-heading (point)))
|
|
- (org-end-of-meta-data)
|
|
|
|
|
|
+ (org-end-of-meta-data t)
|
|
(unless (looking-at-p "-----BEGIN PGP MESSAGE-----")
|
|
(unless (looking-at-p "-----BEGIN PGP MESSAGE-----")
|
|
(let ((folded (org-invisible-p))
|
|
(let ((folded (org-invisible-p))
|
|
(crypt-key (org-crypt-key-for-heading))
|
|
(crypt-key (org-crypt-key-for-heading))
|
|
@@ -205,7 +205,7 @@ See `org-crypt-disable-auto-save'."
|
|
(save-excursion
|
|
(save-excursion
|
|
(outline-end-of-heading)
|
|
(outline-end-of-heading)
|
|
(org-invisible-p))))
|
|
(org-invisible-p))))
|
|
- (org-end-of-meta-data)
|
|
|
|
|
|
+ (org-end-of-meta-data t)
|
|
(when (looking-at "-----BEGIN PGP MESSAGE-----")
|
|
(when (looking-at "-----BEGIN PGP MESSAGE-----")
|
|
(org-crypt-check-auto-save)
|
|
(org-crypt-check-auto-save)
|
|
(setq-local epg-context (epg-make-context nil t t))
|
|
(setq-local epg-context (epg-make-context nil t t))
|