[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r104811: * allout.el (allout-yank-pro
From: |
Ken Manheimer |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r104811: * allout.el (allout-yank-processing): Fix injection of extra space between |
Date: |
Thu, 30 Jun 2011 10:38:35 -0400 |
User-agent: |
Bazaar (2.3.1) |
------------------------------------------------------------
revno: 104811
committer: Ken Manheimer <address@hidden>
branch nick: trunk
timestamp: Thu 2011-06-30 10:38:35 -0400
message:
* allout.el (allout-yank-processing): Fix injection of extra space between
bullet and non-whitespace character in first topic when pasting, ensuring
that the actual spacing in the pasted topic following the bullet char is
preserved. This extra space was causing pasted encrypted topics to get a
decrypted status even when the content was actually still encrypted. Now
the decryption status from before the paste is preserved.
(allout-flag-region): Set all allout overlays so they evaporate when
reduced to zero length (evanescent), to prevent overlay leakage.
modified:
lisp/ChangeLog
lisp/allout.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2011-06-30 03:13:35 +0000
+++ b/lisp/ChangeLog 2011-06-30 14:38:35 +0000
@@ -1,3 +1,17 @@
+2011-06-30 Ken Manheimer <address@hidden>
+
+ * allout.el (allout-yank-processing): Fix injection of extra space
+ between bullet and non-whitespace character in first topic when
+ pasting, ensuring that the actual spacing in the pasted topic
+ following the bullet char is preserved. This extra space was
+ causing pasted encrypted topics to get a decrypted status even
+ when the content was actually still encrypted. Now the decryption
+ status from before the paste is preserved.
+
+ (allout-flag-region): Set all allout overlays so they evaporate
+ when reduced to zero length (evanescent), to prevent overlay
+ leakage.
+
2011-06-30 Glenn Morris <address@hidden>
* w32-fns.el (w32-charset-info-alist): Declare.
=== modified file 'lisp/allout.el'
--- a/lisp/allout.el 2011-06-25 18:08:41 +0000
+++ b/lisp/allout.el 2011-06-30 14:38:35 +0000
@@ -4605,8 +4605,7 @@
; and delete residual subj
; prefix digits and space:
(while (looking-at "[0-9]") (delete-char 1))
- (if (looking-at " ")
- (delete-char 1))))
+ (delete-char -1)))
;; Assert new topic's bullet - minimal effort if unchanged:
(allout-rebullet-heading (string-to-char prefix-bullet)))
(exchange-point-and-mark))))
@@ -4736,6 +4735,7 @@
(when flag
(let ((o (make-overlay from to nil 'front-advance)))
(overlay-put o 'category 'allout-exposure-category)
+ (overlay-put o 'evaporate t)
(when (featurep 'xemacs)
(let ((props (symbol-plist 'allout-exposure-category)))
(while props
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r104811: * allout.el (allout-yank-processing): Fix injection of extra space between,
Ken Manheimer <=