diff options
Diffstat (limited to 'elisp/geiser-base.el')
| -rw-r--r-- | elisp/geiser-base.el | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/elisp/geiser-base.el b/elisp/geiser-base.el index 2a8d5a9..362930d 100644 --- a/elisp/geiser-base.el +++ b/elisp/geiser-base.el @@ -91,6 +91,12 @@ (let* ((str (buffer-substring-no-properties begin end)) (pieces (split-string str nil t))) (mapconcat 'identity pieces " "))))) + +(defun geiser--insert-with-face (str face) + (let ((p (point))) + (insert str) + (put-text-property p (point) 'face face))) + (provide 'geiser-base) ;;; geiser-base.el ends here |