Function: vtable--alter-column-width

vtable--alter-column-width is a byte-compiled function defined in vtable.el.gz.

Signature

(vtable--alter-column-width TABLE COLUMN DELTA)

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/vtable.el.gz
(defun vtable--alter-column-width (table column delta)
  (let* ((widths (vtable--cache-widths (vtable--current-cache table)))
         (new-width (max (* (vtable--char-width table) 2)
                         (+ (aref widths column) delta))))
    (setf (aref widths column) new-width)
    ;; Store the width so it'll be respected on a revert.
    (setf (vtable-column-width (elt (vtable-columns table) column))
          (if (display-graphic-p)
              (format "%dpx" new-width)
            new-width))
    (vtable-revert table)))