geekinney/ekp
1
0
Fork 0
Code Issues Pull Requests Actions 1 Packages Projects Releases Wiki Activity

update test

Browse Source
This commit is contained in:
Kinneyzhang 2025-08-22 00:15:33 +08:00
parent 37baccded8
commit 820e73920a
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
tests/ekp-tests.el
View File

@ -115,20 +115,20 @@
(ekp-propertize (ekp-propertize
(ekp-propertize (nth 0 lst) (ekp-propertize (nth 0 lst)
'(face (:family "Comic Sans MS"))) '(face (:family "Comic Sans MS")))
'(face (:height 1.3 :foreground "Cyan")) '(face (:height 1.3 :foreground "cyan"))
0 2) 0 2)
(ekp-propertize (ekp-propertize
(ekp-propertize (nth 1 lst) (ekp-propertize (nth 1 lst)
'(face (:family "Cascadia Next SC"))) '(face (:family "Cascadia Next SC")))
'(face (:height 1.3 :foreground "Cyan")) '(face (:height 1.3 :foreground "green"))
0 2) 0 2)
(ekp-propertize (ekp-propertize
(ekp-propertize (nth 2 lst) (ekp-propertize (nth 2 lst)
'(face (:family "Source Han Sans SC"))) '(face (:family "IBM 3270 Narrow")))
'(face (:height 1.3 :foreground "Cyan")) '(face (:height 1.3 :foreground "orange"))
0 2))) 0 2)))
(ekp-clear-caches) (ekp-clear-caches)
(pop-buffer-insert 30 (pop-buffer-insert 30
(ekp-pixel-justify (string-join lst "\n\n") 683)))) "\n" (ekp-pixel-justify (string-join lst "\n\n") 683))))
;; (ekp-test-keep-props) ;; (ekp-test-keep-props)