Move calendar-month metadata to calendar-read-date (bug#68214)
* lisp/minibuffer.el (completion-category-defaults): Move the 'calendar-month' default value to the metadata in calendar-read-date. * lisp/calendar/calendar.el (calendar-read-date): Add display-sort-function moved from completion-category-defaults.
This commit is contained in:
parent
e41a7d8127
commit
d5c3173366
2 changed files with 3 additions and 3 deletions
|
@ -2354,7 +2354,8 @@ returned is (month year)."
|
|||
(completion-table-with-metadata
|
||||
(completion-table-case-fold
|
||||
(append month-array nil))
|
||||
`((category . calendar-month)))
|
||||
`((category . calendar-month)
|
||||
(display-sort-function . identity)))
|
||||
nil t nil nil defmon)
|
||||
(calendar-make-alist month-array 1) t)))
|
||||
(defday (calendar-extract-day default-date))
|
||||
|
|
|
@ -1197,8 +1197,7 @@ styles for specific categories, such as files, buffers, etc."
|
|||
(project-file (styles . (substring)))
|
||||
(xref-location (styles . (substring)))
|
||||
(info-menu (styles . (basic substring)))
|
||||
(symbol-help (styles . (basic shorthand substring)))
|
||||
(calendar-month (display-sort-function . identity)))
|
||||
(symbol-help (styles . (basic shorthand substring))))
|
||||
"Default settings for specific completion categories.
|
||||
|
||||
Each entry has the shape (CATEGORY . ALIST) where ALIST is
|
||||
|
|
Loading…
Add table
Reference in a new issue