[elpa] externals/eev e7b7f3fbb5 2/2: Made `find-1stclassvideos' interactive. Try: M-x find-1stclassvideos

[ELPA Syncer]

branch: externals/eev
commit e7b7f3fbb5fdcfe1a71cd15929270d3137a1b7d3
Author: Eduardo Ochs <eduardoochs@gmail.com>
Commit: Eduardo Ochs <eduardoochs@gmail.com>

    Made `find-1stclassvideos' interactive. Try: M-x find-1stclassvideos
---
 VERSION       | 4 ++--
 eev-tlinks.el | 2 ++
 2 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/VERSION b/VERSION
index ee81d498a8..27203b15f7 100644
--- a/VERSION
+++ b/VERSION
@@ -1,2 +1,2 @@
-Fri Feb 11 07:24:13 GMT 2022
-Fri Feb 11 04:24:13 -03 2022
+Fri Feb 11 07:39:19 GMT 2022
+Fri Feb 11 04:39:19 -03 2022
diff --git a/eev-tlinks.el b/eev-tlinks.el
index 70e57e15ee..2fb0e9a27c 100644
--- a/eev-tlinks.el
+++ b/eev-tlinks.el
@@ -2836,6 +2836,8 @@ and: (find-video-links-intro \\\"7. \\\" 
\\\"find-eev-video\\\")
 ;; Try: (find-1stclassvideos)
 ;;
 (defun find-1stclassvideos (&rest rest)
+  "Visit a temporary buffer with a list of all first-class videos of eev."
+  (interactive)
   (let* ((ee-buffer-name (or ee-buffer-name "*(find-1stclassvideos)*"))
         (f (lambda (s) `(find-1stclassvideo-links ,s)))
         (finds (mapcar f (ee-1stclassvideos))))