[nongnu] elpa/logview f593647eb7 205/259: Fix the test added in commit fb7762b: use a more permissive regexp and make sure that all three log entries are recognized.

[ELPA Syncer]

branch: elpa/logview
commit f593647eb78cb6f2cce8a0a9d12f66ca59c9df4a
Author: Paul Pogonyshev <pogonyshev@gmail.com>
Commit: Paul Pogonyshev <pogonyshev@gmail.com>

    Fix the test added in commit fb7762b: use a more permissive regexp and make 
sure that all three log entries are recognized.
---
 test/logview.el | 15 +++++++++++++--
 1 file changed, 13 insertions(+), 2 deletions(-)

diff --git a/test/logview.el b/test/logview.el
index 7bea5df334..2bc648d1a8 100644
--- a/test/logview.el
+++ b/test/logview.el
@@ -152,11 +152,22 @@
 (ert-deftest logview-test-custom-submode-with-special-regexp ()
   (logview--test-with-file "custom/2.log"
     :extra-customizations '((logview-additional-submodes
-                             '(("custom" (format . "TIMESTAMP IGNORED LEVEL T: 
<<RX:THREAD:[^-]+>> NAME - MESSAGE") (levels . "SLF4J")))))
+                             '(("custom" (format . "TIMESTAMP IGNORED LEVEL T: 
<<RX:THREAD:.+?>> NAME - MESSAGE") (levels . "SLF4J")))))
     (should (equal logview--submode-name "custom"))
     (logview--locate-current-entry entry start
       (should (and entry (equal start 1)))
-      (should (equal (logview--entry-group entry start logview--name-group) 
"WhateverName")))))
+      (should (equal (logview--entry-group entry start logview--name-group)   
"WhateverName"))
+      (should (equal (logview--entry-group entry start logview--thread-group) 
"Fake Thread")))
+    (forward-line)
+    (logview--locate-current-entry entry start
+      (should entry)
+      (should (equal (logview--entry-group entry start logview--name-group)   
"LottieLockView"))
+      (should (equal (logview--entry-group entry start logview--thread-group) 
"Subscription Manager Consumer Thread")))
+    (forward-line)
+    (logview--locate-current-entry entry start
+      (should entry)
+      (should (equal (logview--entry-group entry start logview--name-group)   
"LottieLockView"))
+      (should (equal (logview--entry-group entry start logview--thread-group) 
"pool-40-thread-1")))))
 
 ;; Bug: Logview would ignore entry lines if they didn't contain a space at the 
end.  This
 ;; would e.g. happen if you had code like 'log.info ("\n...");' in your 
program.