Function: visual-wrap--prefix

visual-wrap--prefix is a byte-compiled function defined in visual-wrap.el.gz.

Signature

(visual-wrap--prefix FCP)

Source Code

;; Defined in /usr/src/emacs/lisp/visual-wrap.el.gz
(defun visual-wrap--prefix (fcp)
  (let ((fcp-len (string-width fcp)))
    (cond
     ((= 0 visual-wrap-extra-indent)
      fcp)
     ((< 0 visual-wrap-extra-indent)
      (concat fcp (make-string visual-wrap-extra-indent ?\s)))
     ((< 0 (+ visual-wrap-extra-indent fcp-len))
      (substring fcp
                 0
                 (+ visual-wrap-extra-indent fcp-len)))
     (t
      ""))))