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

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

[elpa] externals/company 002e572 6/6: Fix some tests


From: ELPA Syncer
Subject: [elpa] externals/company 002e572 6/6: Fix some tests
Date: Sat, 27 Mar 2021 21:57:13 -0400 (EDT)

branch: externals/company
commit 002e572bf09ec7a5735e5bc098f7a8c0e6386ac5
Author: Dmitry Gutov <dgutov@yandex.ru>
Commit: Dmitry Gutov <dgutov@yandex.ru>

    Fix some tests
    
    add-face-text-property doesn't listify the values preemptively
---
 test/capf-tests.el      | 10 +++++-----
 test/frontends-tests.el |  2 +-
 2 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/test/capf-tests.el b/test/capf-tests.el
index 80a204d..d4ba95f 100644
--- a/test/capf-tests.el
+++ b/test/capf-tests.el
@@ -87,7 +87,7 @@
         render
         #("with-current-buffer"
           0 4 (face (company-tooltip-common company-tooltip))   ; "with"
-          4 19 (face (company-tooltip))))))))
+          4 19 (face company-tooltip)))))))
 
 
 
@@ -118,11 +118,11 @@
         render
         #("with-current-buffer"
           0 1 (face (company-tooltip-common company-tooltip))   ; "w"
-          1 4 (face (company-tooltip))                          ; "ith"
+          1 4 (face company-tooltip)                          ; "ith"
           4 6 (face (company-tooltip-common company-tooltip))   ; "-c"
-          6 12 (face (company-tooltip))                         ; "urrent"
+          6 12 (face company-tooltip)                         ; "urrent"
           12 14 (face (company-tooltip-common company-tooltip)) ; "-b"
-          14 19 (face (company-tooltip))))))))                  ; "uffer"
+          14 19 (face company-tooltip)))))))                  ; "uffer"
 
 (ert-deftest company-non-prefix-modest-capf-highlighting ()
   "Test highlighting for non-prefix `company-capf' in elisp"
@@ -142,7 +142,7 @@
         render
         #("with-current-buffer"
           0 14 (face (company-tooltip-common company-tooltip)); 
"with-current-b"
-          14 19 (face (company-tooltip))))))))                ; "uffer"
+          14 19 (face company-tooltip)))))))                ; "uffer"
 
 (provide 'capf-tests)
 ;;; capf-tests.el ends here
diff --git a/test/frontends-tests.el b/test/frontends-tests.el
index 1a88b01..56202a1 100644
--- a/test/frontends-tests.el
+++ b/test/frontends-tests.el
@@ -321,7 +321,7 @@
     (should (ert-equal-including-properties
              (company-fill-propertize str1 str2 8 nil nil nil)
              #("str1str2"
-               0 4 (face (company-tooltip) mouse-face (company-tooltip-mouse))
+               0 4 (face company-tooltip mouse-face (company-tooltip-mouse))
                4 8 (face (company-tooltip-annotation company-tooltip)
                          mouse-face (company-tooltip-mouse)))))))
 



reply via email to

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