Jak wstawić tekst z określoną twarzą?

Mam twarz stworzoną w ten sposób: (defface test-face '((t . (:height 2.0))) "A face for testing.") Chciałbym wstawić tekst z tą twarzą. Ale te sposoby wstawiają tekst bez twarzy: (insert (propertize "text to insert" 'face 'test-face)) (let ((current-string "text to insert"))...