branch: elpa/annotate
commit f31eddb52387e3b9f2bbcc189283e57c8b008551
Author: Bastian Bechtold <bb@Mr-Bigglesworth.local>
Commit: Bastian Bechtold <bb@Mr-Bigglesworth.local>
fixed bug with annotation on bol
This would show the message `(wrong-type-argument overlayp nil)` and
wouldn't show an annotation on the beginning of the line if the previous
line had an annotation as well.
---
annotate.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/annotate.el b/annotate.el
index 7283aede23..88d72922ec 100644
--- a/annotate.el
+++ b/annotate.el
@@ -329,7 +329,8 @@ annotation plus the newline."
(let ((overlays (sort (overlays-at (point))
(lambda (x y)
(> (overlay-end x) (overlay-end y))))))
- (goto-char (overlay-end (car overlays))))
+ (if overlays
+ (goto-char (overlay-end (car overlays)))))
;; capture the area from the overlay to EOL for the modification guard
;; and the newline itself for the annotation.
(re-search-forward "\\(.*\\)\\(\n\\)")
