projects
/
elisp
/
epg.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
(epa-insert-keys): Renamed from epa-list-keys-1; don't
[elisp/epg.git]
/
epa.el
diff --git
a/epa.el
b/epa.el
index
75cb754
..
b9eb487
100644
(file)
--- a/
epa.el
+++ b/
epa.el
@@
-300,11
+300,21
@@
(while keys
(setq point (point))
(insert " ")
(while keys
(setq point (point))
(insert " ")
- (put-text-property point (point) 'epa-key (car keys))
+ (add-text-properties point (point)
+ (list 'epa-key (car keys)
+ 'front-sticky nil
+ 'rear-nonsticky t
+ 'start-open t
+ 'end-open t))
(widget-create 'epa-key :value (car keys))
(insert "\n")
(setq keys (cdr keys))))
(widget-create 'epa-key :value (car keys))
(insert "\n")
(setq keys (cdr keys))))
- (put-text-property (point-min) (point-max) 'epa-list-keys t))))
+ (add-text-properties (point-min) (point-max)
+ (list 'epa-list-keys t
+ 'front-sticky nil
+ 'rear-nonsticky t
+ 'start-open t
+ 'end-open t)))))
(defun epa-marked-keys ()
(or (save-excursion
(defun epa-marked-keys ()
(or (save-excursion