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

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

[elpa] externals/company 6c579f7000 13/24: Add new test, for the previou


From: ELPA Syncer
Subject: [elpa] externals/company 6c579f7000 13/24: Add new test, for the previous
Date: Mon, 6 Nov 2023 09:57:37 -0500 (EST)

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

    Add new test, for the previous
---
 test/frontends-tests.el | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/test/frontends-tests.el b/test/frontends-tests.el
index 907e78ed83..3aeb526969 100644
--- a/test/frontends-tests.el
+++ b/test/frontends-tests.el
@@ -495,6 +495,16 @@
              (company-modify-line str "zz" (* 4 (frame-char-width)))
              "-*-fzzbar"))))
 
+(ert-deftest company-modify-line-with-prettify ()
+  (with-temp-buffer
+    (insert "lambda foo bar")
+    (setq-local prettify-symbols-alist '(("lambda" . ?λ)))
+    (prettify-symbols-mode)
+    (font-lock-ensure (point-min) (point-max))
+    (should (equal
+             (company-modify-line (buffer-string) "zz" (* 3 
(frame-char-width)))
+             "lambda fzz bar"))))
+
 (ert-deftest company-scrollbar-bounds ()
   (should (equal nil (company--scrollbar-bounds 0 3 3)))
   (should (equal nil (company--scrollbar-bounds 0 4 3)))



reply via email to

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