Function: visual-wrap--adjust-prefix
visual-wrap--adjust-prefix is a byte-compiled function defined in
visual-wrap.el.gz.
Signature
(visual-wrap--adjust-prefix PREFIX)
Documentation
Adjust PREFIX with visual-wrap-extra-indent.
Source Code
;; Defined in /usr/src/emacs/lisp/visual-wrap.el.gz
(defun visual-wrap--adjust-prefix (prefix)
"Adjust PREFIX with `visual-wrap-extra-indent'."
(if (numberp prefix)
(+ visual-wrap-extra-indent prefix)
(let ((prefix-len (string-width prefix)))
(cond
((= 0 visual-wrap-extra-indent)
prefix)
((< 0 visual-wrap-extra-indent)
(concat prefix (make-string visual-wrap-extra-indent ?\s)))
((< 0 (+ visual-wrap-extra-indent prefix-len))
(substring prefix
0 (+ visual-wrap-extra-indent prefix-len)))
(t
"")))))