buttonize signatures as well

This commit is contained in:
Alexander Botero-Lowry 2009-11-19 22:11:48 -08:00 committed by Alexander Botero-Lowry
parent 14f492ba0c
commit 89f55ab84b

View file

@ -508,11 +508,11 @@ which this thread was originally shown."
(progn (progn
(overlay-put (make-overlay beg-sub end) (overlay-put (make-overlay beg-sub end)
'invisible 'notmuch-show-signature) 'invisible 'notmuch-show-signature)
(overlay-put (make-overlay beg (- beg-sub 1)) (goto-char (- beg-sub 1))
'after-string (insert (concat "\n" indent))
(concat "\n" indent (insert-button (concat "[" (number-to-string sig-lines)
"[" (number-to-string sig-lines) "-line signature. Press 's' to show.]"))
"-line signature. Press 's' to show.]")) (insert "\n")
(goto-char end))))) (goto-char end)))))
(forward-line)))) (forward-line))))