Function: recentf-dialog-goto-first

recentf-dialog-goto-first is a byte-compiled function defined in recentf.el.gz.

Signature

(recentf-dialog-goto-first WIDGET-TYPE)

Documentation

Move the cursor to the first WIDGET-TYPE in current dialog.

Go to the beginning of buffer if not found.

Source Code

;; Defined in /usr/src/emacs/lisp/recentf.el.gz
(defun recentf-dialog-goto-first (widget-type)
  "Move the cursor to the first WIDGET-TYPE in current dialog.
Go to the beginning of buffer if not found."
  (goto-char (point-min))
  (condition-case nil
      (let ((no-echo (or recentf-suppress-open-file-help
                         ;; Show help messages by default only when
                         ;; invoking these interactively (bug#78666).
                         (not (memq this-command '(recentf-open-files
                                                   recentf-open-more-files
                                                   recentf-forward
                                                   recentf-backward)))))
            done)
        (widget-move 1 no-echo)
        (while (not done)
          (if (eq widget-type (widget-type (widget-at (point))))
              (setq done t)
            (widget-move 1 no-echo))))
    (error
     (goto-char (point-min)))))