Function: artist-text-insert-common

artist-text-insert-common is a byte-compiled function defined in artist.el.gz.

Signature

(artist-text-insert-common X Y TEXT SEE-THRU)

Documentation

At position X, Y, insert text TEXT.

If SEE-THRU is non-nil, then blanks in TEXT do not replace text in the buffer.

Source Code

;; Defined in /usr/src/emacs/lisp/textmodes/artist.el.gz
(defun artist-text-insert-common (x y text see-thru)
  "At position X, Y, insert text TEXT.
If SEE-THRU is non-nil, then blanks in TEXT do not replace text
in the buffer."
  (let* ((string-list (artist-string-split text "\n"))
	 (i 0)
	 (len (length string-list)))
    (while (< i len)
      (artist-move-to-xy x (+ y i))
      (artist-replace-string (car string-list) see-thru)
      (setq string-list (cdr string-list))
      (setq i (1+ i)))))