Function: bookmark-completing-read

bookmark-completing-read is a byte-compiled function defined in bookmark.el.gz.

Signature

(bookmark-completing-read PROMPT &optional DEFAULT)

Documentation

Prompting with PROMPT, read a bookmark name in completion.

PROMPT will get a ": " stuck on the end no matter what, so you probably don't want to include one yourself. Optional arg DEFAULT is a string to return if the user input is empty. If DEFAULT is nil then return empty string for empty input.

Source Code

;; Defined in /usr/src/emacs/lisp/bookmark.el.gz
(defun bookmark-completing-read (prompt &optional default)
  "Prompting with PROMPT, read a bookmark name in completion.
PROMPT will get a \": \" stuck on the end no matter what, so you
probably don't want to include one yourself.
Optional arg DEFAULT is a string to return if the user input is empty.
If DEFAULT is nil then return empty string for empty input."
  (bookmark-maybe-load-default-file) ; paranoia
  (if (listp last-nonmenu-event)
      (bookmark-menu-popup-paned-menu t prompt
                                      (mapcar 'bookmark-name-from-full-record
                                              (bookmark-maybe-sort-alist)))
    (let* ((completion-ignore-case bookmark-completion-ignore-case)
           (default (unless (equal "" default) default)))
      (completing-read (format-prompt prompt default)
                       (lambda (string pred action)
                         (if (eq action 'metadata)
                             '(metadata (category . bookmark))
                             (complete-with-action
                              action bookmark-alist string pred)))
                       nil 0 nil 'bookmark-history default))))