Function: vc-dir-show-more-button

vc-dir-show-more-button is a byte-compiled function defined in vc-dir.el.gz.

Signature

(vc-dir-show-more-button &optional TEXT)

Documentation

Show a button to refresh VC-Dir with vc-dir-process-output-limit nil.

TEXT is added to the EWOC footer on a line after the button. Called by VC backend dir-status-files implementations when the output to process exceeds a non-nil vc-dir-process-output-limit.

Source Code

;; Defined in /usr/src/emacs/lisp/vc/vc-dir.el.gz
(defun vc-dir-show-more-button (&optional text)
  "Show a button to refresh VC-Dir with `vc-dir-process-output-limit' nil.
TEXT is added to the EWOC footer on a line after the button.
Called by VC backend `dir-status-files' implementations when the output
to process exceeds a non-nil `vc-dir-process-output-limit'."
  (ewoc-set-hf
   vc-ewoc nil
   (with-temp-buffer
     (insert (substitute-quotes "\nHit `"))
     (insert-text-button "vc-dir-process-output-limit"
                         'type 'help-variable
                         'help-args '(vc-dir-process-output-limit))
     (insert (substitute-quotes "': "))
     (insert-text-button
      "run again with no limit"
      'action (lambda (&rest _)
                (let (vc-dir-process-output-limit)
                  (vc-dir-refresh)))
      'help-echo "Regenerate the VC-Dir buffer with no process output limit")
     (when text (insert "\n" text))
     (buffer-string))))