Replace lyskom-princ
The function lyskom-princ
is used to insert text with text properties at a marker. Replace it with something like this:
(defun lyskom-insert-at (string marker)
(save-excursion (goto-char marker) (insert string)))
The existing code is far too complex.