Function: cider-docview-format-tables

cider-docview-format-tables is a byte-compiled function defined in cider-doc.el.

Signature

(cider-docview-format-tables BUFFER)

Documentation

Align BUFFER tables and dim borders.

This processes the GFM table markdown extension using org-table. Tables are marked to be ignored by line wrap.

Source Code

;; Defined in ~/.emacs.d/elpa/cider-20260414.1619/cider-doc.el
(defun cider-docview-format-tables (buffer)
  "Align BUFFER tables and dim borders.
This processes the GFM table markdown extension using `org-table'.
Tables are marked to be ignored by line wrap."
  (require 'org-table)
  (with-current-buffer buffer
    (save-excursion
      (let ((border 'cider-docview-table-border-face))
        (org-table-map-tables
         (lambda ()
           (org-table-align)
           (goto-char (org-table-begin))
           (while (search-forward-regexp "[+|-]" (org-table-end) t)
             (put-text-property (match-beginning 0) (match-end 0) 'font-lock-face border))
           (put-text-property (org-table-begin) (org-table-end) 'block 'table)))))))