emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/annotate a648cd44df 010/372: make auxiliary functions non-


From: ELPA Syncer
Subject: [nongnu] elpa/annotate a648cd44df 010/372: make auxiliary functions non-interactive
Date: Fri, 4 Feb 2022 16:58:15 -0500 (EST)

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)) ? )))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]