Function: bs--format-aux

bs--format-aux is a byte-compiled function defined in bs.el.gz.

Signature

(bs--format-aux STRING ALIGN LEN)

Documentation

Pad STRING to length LEN with alignment ALIGN.

ALIGN is one of the symbols left, middle, or right.

Source Code

;; Defined in /usr/src/emacs/lisp/bs.el.gz
(defun bs--format-aux (string align len)
  "Pad STRING to length LEN with alignment ALIGN.
ALIGN is one of the symbols `left', `middle', or `right'."
  (let* ((width (length string))
         (len (max len width)))
    (format (format "%%%s%ds" (if (eq align 'right) "" "-") len)
            (if (eq align 'middle)
                (concat (make-string (/ (- len width) 2) ?\s) string)
              string))))