branch: elpa/subed
commit ed5cff4a2cdf3d5f9288e2854b6d069b1b982e51
Author: Sacha Chua <[email protected]>
Commit: Sacha Chua <[email protected]>

    subed-mpv-screenshot: Copy filename only if called interactively
    
    * subed/subed-mpv.el (subed-mpv-screenshot): Copy filename and display
    message only if called interactively.
---
 subed/subed-mpv.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/subed/subed-mpv.el b/subed/subed-mpv.el
index 85213403f3..6a58b28227 100644
--- a/subed/subed-mpv.el
+++ b/subed/subed-mpv.el
@@ -466,8 +466,9 @@ Returns the filename."
         (setq file (car (sort (seq-remove #'file-directory-p
                                           (directory-files default-directory 
'full "mpv-shot[0-9]+\\.jpg" t))
                               #'file-newer-than-file-p))))))
-  (kill-new file)
-  (message "Copied %s" file)
+  (when (called-interactively-p 'any)
+    (kill-new file)
+    (message "Copied %s" file))
   file)
 
 (defun subed-mpv-screenshot-with-subtitles (&optional file)

Reply via email to