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

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

[nongnu] elpa/subed 909cffd 216/389: Use generic function subed-subtitle


From: ELPA Syncer
Subject: [nongnu] elpa/subed 909cffd 216/389: Use generic function subed-subtitle-text in test-subed.el
Date: Fri, 3 Dec 2021 11:00:29 -0500 (EST)

branch: elpa/subed
commit 909cffd89f3bc7a800c9dae77883ad3414da7ede
Author: Random User <rndusr@posteo.de>
Commit: Random User <rndusr@posteo.de>

    Use generic function subed-subtitle-text in test-subed.el
---
 tests/test-subed.el | 54 ++++++++++++++++++++++++++---------------------------
 1 file changed, 27 insertions(+), 27 deletions(-)

diff --git a/tests/test-subed.el b/tests/test-subed.el
index de966f9..90ba711 100644
--- a/tests/test-subed.el
+++ b/tests/test-subed.el
@@ -13,9 +13,9 @@
         (forward-line 2)
         (kill-line)
         (insert "Hello."))
-      (expect (subed-srt--subtitle-text 1) :to-equal "Hello.")
-      (expect (subed-srt--subtitle-text 2) :to-equal "Bar.")
-      (expect (subed-srt--subtitle-text 3) :to-equal "Baz.")
+      (expect (subed-subtitle-text 1) :to-equal "Hello.")
+      (expect (subed-subtitle-text 2) :to-equal "Bar.")
+      (expect (subed-subtitle-text 3) :to-equal "Baz.")
       (expect (point) :to-equal 20)
       (subed-jump-to-subtitle-time-stop 2)
       (subed-for-each-subtitle nil nil nil
@@ -23,9 +23,9 @@
         (forward-line 2)
         (kill-line)
         (insert "HEllo."))
-      (expect (subed-srt--subtitle-text 1) :to-equal "Hello.")
-      (expect (subed-srt--subtitle-text 2) :to-equal "HEllo.")
-      (expect (subed-srt--subtitle-text 3) :to-equal "Baz.")
+      (expect (subed-subtitle-text 1) :to-equal "Hello.")
+      (expect (subed-subtitle-text 2) :to-equal "HEllo.")
+      (expect (subed-subtitle-text 3) :to-equal "Baz.")
       (expect (point) :to-equal 60)
       (subed-jump-to-subtitle-time-stop 3)
       (subed-for-each-subtitle nil nil nil
@@ -33,9 +33,9 @@
         (forward-line 2)
         (kill-line)
         (insert "HELlo."))
-      (expect (subed-srt--subtitle-text 1) :to-equal "Hello.")
-      (expect (subed-srt--subtitle-text 2) :to-equal "HEllo.")
-      (expect (subed-srt--subtitle-text 3) :to-equal "HELlo.")
+      (expect (subed-subtitle-text 1) :to-equal "Hello.")
+      (expect (subed-subtitle-text 2) :to-equal "HEllo.")
+      (expect (subed-subtitle-text 3) :to-equal "HELlo.")
       (expect (point) :to-equal 99)))
   (describe "providing only the beginning"
     (it "forwards."
@@ -49,9 +49,9 @@
             (forward-line 2)
             (kill-line)
             (insert (pop new-texts))))
-        (expect (subed-srt--subtitle-text 1) :to-equal "Foo.")
-        (expect (subed-srt--subtitle-text 2) :to-equal "A")
-        (expect (subed-srt--subtitle-text 3) :to-equal "B")
+        (expect (subed-subtitle-text 1) :to-equal "Foo.")
+        (expect (subed-subtitle-text 2) :to-equal "A")
+        (expect (subed-subtitle-text 3) :to-equal "B")
         (expect (point) :to-equal 3)))
     (it "backwards."
       (with-temp-buffer
@@ -64,9 +64,9 @@
             (forward-line 2)
             (kill-line)
             (insert (pop new-texts))))
-        (expect (subed-srt--subtitle-text 1) :to-equal "Foo.")
-        (expect (subed-srt--subtitle-text 2) :to-equal "B")
-        (expect (subed-srt--subtitle-text 3) :to-equal "A")
+        (expect (subed-subtitle-text 1) :to-equal "Foo.")
+        (expect (subed-subtitle-text 2) :to-equal "B")
+        (expect (subed-subtitle-text 3) :to-equal "A")
         (expect (point) :to-equal 92)))
     )
   (describe "providing beginning and end,"
@@ -82,9 +82,9 @@
               (forward-line 2)
               (kill-line)
               (insert (pop new-texts))))
-          (expect (subed-srt--subtitle-text 1) :to-equal "Foo.")
-          (expect (subed-srt--subtitle-text 2) :to-equal "A")
-          (expect (subed-srt--subtitle-text 3) :to-equal "B")
+          (expect (subed-subtitle-text 1) :to-equal "Foo.")
+          (expect (subed-subtitle-text 2) :to-equal "A")
+          (expect (subed-subtitle-text 3) :to-equal "B")
           (expect (point) :to-equal 20)))
       (it "backwards."
         (with-temp-buffer
@@ -97,9 +97,9 @@
               (forward-line 2)
               (kill-line)
               (insert (pop new-texts))))
-          (expect (subed-srt--subtitle-text 1) :to-equal "Foo.")
-          (expect (subed-srt--subtitle-text 2) :to-equal "B")
-          (expect (subed-srt--subtitle-text 3) :to-equal "A")
+          (expect (subed-subtitle-text 1) :to-equal "Foo.")
+          (expect (subed-subtitle-text 2) :to-equal "B")
+          (expect (subed-subtitle-text 3) :to-equal "A")
           (expect (point) :to-equal 76)))
       )
     (describe "excluding subtitles below"
@@ -114,9 +114,9 @@
               (forward-line 2)
               (kill-line)
               (insert (pop new-texts))))
-          (expect (subed-srt--subtitle-text 1) :to-equal "A")
-          (expect (subed-srt--subtitle-text 2) :to-equal "B")
-          (expect (subed-srt--subtitle-text 3) :to-equal "Baz.")
+          (expect (subed-subtitle-text 1) :to-equal "A")
+          (expect (subed-subtitle-text 2) :to-equal "B")
+          (expect (subed-subtitle-text 3) :to-equal "Baz.")
           (expect (point) :to-equal 100)))
       (it "backwards."
         (with-temp-buffer
@@ -129,9 +129,9 @@
               (forward-line 2)
               (kill-line)
               (insert (pop new-texts))))
-          (expect (subed-srt--subtitle-text 1) :to-equal "B")
-          (expect (subed-srt--subtitle-text 2) :to-equal "A")
-          (expect (subed-srt--subtitle-text 3) :to-equal "Baz.")
+          (expect (subed-subtitle-text 1) :to-equal "B")
+          (expect (subed-subtitle-text 2) :to-equal "A")
+          (expect (subed-subtitle-text 3) :to-equal "Baz.")
           (expect (point) :to-equal 55)))
       )
     )



reply via email to

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