Function: ibuffer--format-summary

ibuffer--format-summary is a byte-compiled function defined in ibuffer.el.gz.

Signature

(ibuffer--format-summary ELEMENT)

Source Code

;; Defined in /usr/src/emacs/lisp/ibuffer.el.gz
(defun ibuffer--format-summary (element)
  (if (stringp element)
      (make-string (length element) ?\s)
    (pcase-let ((`(,sym ,min ,_max ,align) element))
      ;; Ignore negative MIN, since the summaries are left-aligned.
      (when (minusp min)
        (setq min (- min)))
      (let* ((summary
              (if (get sym 'ibuffer-column-summarizer)
                  (funcall (get sym 'ibuffer-column-summarizer)
                           (get sym 'ibuffer-column-summary))
                (make-string
                 (length (get sym 'ibuffer-column-name))
                 ?\s)))
             (len (length summary)))
        (if (< len min)
            (ibuffer-format-column summary
                                   (- min len)
                                   align)
          summary)))))