Variable: org-read-date-minibuffer-local-map

org-read-date-minibuffer-local-map is a variable defined in org-keys.el.gz.

Value

!              #<anonymous-function>
.              #<anonymous-function>
<              #<anonymous-function>
<XF86Back>     previous-history-element
<XF86Forward>  next-history-element
<down>         next-line-or-history-element
<kp-4>         tpu-search-forward-exit
<kp-5>         tpu-search-backward-exit
<kp-enter>     exit-minibuffer
<next>         next-history-element
<prior>        previous-history-element
<up>           previous-line-or-history-element
>              #<anonymous-function>
C-.            #<anonymous-function>
C-<tab>        file-cache-minibuffer-complete
C-g            minibuffer-keyboard-quit
C-j            exit-minibuffer
C-v            #<anonymous-function>
ESC S-<down>   #<anonymous-function>
ESC S-<left>   #<anonymous-function>
ESC S-<right>  #<anonymous-function>
ESC S-<up>     #<anonymous-function>
M-<            minibuffer-beginning-of-buffer
M-S-<down>     #<anonymous-function>
M-S-<left>     #<anonymous-function>
M-S-<right>    #<anonymous-function>
M-S-<up>       #<anonymous-function>
M-n            next-history-element
M-p            previous-history-element
M-r            previous-matching-history-element
M-s            next-matching-history-element
M-v            #<anonymous-function>
RET            exit-minibuffer
S-<down>       #<anonymous-function>
S-<left>       #<anonymous-function>
S-<right>      #<anonymous-function>
S-<up>         #<anonymous-function>
TAB            self-insert-command

Documentation

Keymap for minibuffer commands when using org-read-date.

Source Code

;; Defined in /usr/src/emacs/lisp/org/org-keys.el.gz
;;; Read date map

(defvar org-read-date-minibuffer-local-map
  (let* ((map (make-sparse-keymap)))
    (set-keymap-parent map minibuffer-local-map)
    (org-defkey map (kbd ".")
                (lambda () (interactive)
		  ;; Are we at the beginning of the prompt?
		  (if (looking-back "^[^:]+: "
				    (let ((inhibit-field-text-motion t))
				      (line-beginning-position)))
		      (org-eval-in-calendar '(calendar-goto-today))
		    (insert "."))))
    (org-defkey map (kbd "C-.")
                (lambda () (interactive)
		  (org-eval-in-calendar '(calendar-goto-today))))
    (org-defkey map (kbd "M-S-<left>")
                (lambda () (interactive)
                  (org-eval-in-calendar '(calendar-backward-month 1))))
    (org-defkey map (kbd "ESC S-<left>")
                (lambda () (interactive)
                  (org-eval-in-calendar '(calendar-backward-month 1))))
    (org-defkey map (kbd "M-S-<right>")
                (lambda () (interactive)
                  (org-eval-in-calendar '(calendar-forward-month 1))))
    (org-defkey map (kbd "ESC S-<right>")
                (lambda () (interactive)
                  (org-eval-in-calendar '(calendar-forward-month 1))))
    (org-defkey map (kbd "M-S-<up>")
                (lambda () (interactive)
                  (org-eval-in-calendar '(calendar-backward-year 1))))
    (org-defkey map (kbd "ESC S-<up>")
                (lambda () (interactive)
                  (org-eval-in-calendar '(calendar-backward-year 1))))
    (org-defkey map (kbd "M-S-<down>")
                (lambda () (interactive)
                  (org-eval-in-calendar '(calendar-forward-year 1))))
    (org-defkey map (kbd "ESC S-<down>")
                (lambda () (interactive)
                  (org-eval-in-calendar '(calendar-forward-year 1))))
    (org-defkey map (kbd "S-<up>")
                (lambda () (interactive)
                  (org-eval-in-calendar '(calendar-backward-week 1))))
    (org-defkey map (kbd "S-<down>")
                (lambda () (interactive)
                  (org-eval-in-calendar '(calendar-forward-week 1))))
    (org-defkey map (kbd "S-<left>")
                (lambda () (interactive)
                  (org-eval-in-calendar '(calendar-backward-day 1))))
    (org-defkey map (kbd "S-<right>")
                (lambda () (interactive)
                  (org-eval-in-calendar '(calendar-forward-day 1))))
    (org-defkey map (kbd "!")
                (lambda () (interactive)
                  (org-eval-in-calendar '(diary-view-entries))
                  (message "")))
    (org-defkey map (kbd ">")
                (lambda () (interactive)
                  (org-eval-in-calendar '(calendar-scroll-left 1))))
    (org-defkey map (kbd "<")
                (lambda () (interactive)
                  (org-eval-in-calendar '(calendar-scroll-right 1))))
    (org-defkey map (kbd "C-v")
                (lambda () (interactive)
                  (org-eval-in-calendar
                   '(calendar-scroll-left-three-months 1))))
    (org-defkey map (kbd "M-v")
                (lambda () (interactive)
                  (org-eval-in-calendar
                   '(calendar-scroll-right-three-months 1))))
    map)
  "Keymap for minibuffer commands when using `org-read-date'.")