branch: elpa/annotate
commit a648cd44dffc72119b10d023adf2bd46003aa372
Author: Bastian Bechtold <bb@Mr-Bigglesworth.local>
Commit: Bastian Bechtold <bb@Mr-Bigglesworth.local>
make auxiliary functions non-interactive
---
annotate.el | 2 --
1 file changed, 2 deletions(-)
diff --git a/annotate.el b/annotate.el
index 4a8eefaaca..b9e06c1f9e 100644
--- a/annotate.el
+++ b/annotate.el
@@ -48,7 +48,6 @@
(defun annotate-create-annotation (start end)
"Create a new annotation for selected region."
- (interactive "r")
(let ((highlight (make-overlay start end))
(annotation (read-from-minibuffer "Annotation: "))
(prefix (make-string (- annotate-annotation-column
(annotate-line-length)) ? )))
@@ -62,7 +61,6 @@
(defun annotate-change-annotation (pos)
"Change annotation at point. If empty, delete annotation."
- (interactive "d")
(let* ((highlight (car (overlays-at pos)))
(annotation (read-from-minibuffer "Annotation: " (overlay-get
highlight 'annotation)))
(prefix (make-string (- annotate-annotation-column
(annotate-line-length)) ? )))
