org-agenda: one-armed “if” -> “when”
* lisp/org-agenda.el (org-agenda-mode): (org-agenda-undo, org-agenda): (org-agenda-get-restriction-and-command): (org-batch-agenda-csv, org-fix-agenda-info): (org-agenda-get-some-entry-text): (org-agenda-prepare, org-agenda-finalize): (org-agenda-fontify-priorities, org-agenda-entry-text-hide): (org-agenda-list, org-agenda-ndays-to-span): (org-search-view, org-todo-list): (org-tags-view, org-modify-diary-entry-string): (org-agenda-get-day-entries, org-agenda-get-progress): (org-agenda-get-deadlines, org-prefix-category-max-length): (org-agenda-format-item, org-agenda-fix-displayed-tags): (org-compile-prefix-format): (org-agenda-before-sorting-filter-function): (org-agenda-limit-interactively, org-cmp-time): (org-agenda-set-restriction-lock-from-agenda): (org-agenda-get-represented-tags, org-agenda-filter-apply): (org-agenda-filter-top-headline-apply): (org-agenda-remove-filter, org-agenda-compute-starting-span): (org-unhighlight, org-unhighlight-once): (org-agenda-show-tags, org-agenda-check-no-diary): (org-agenda-date-later-minutes, org-agenda-diary-entry-in-org-file): (org-agenda-add-entry-to-org-agenda-diary-file): (org-agenda-bulk-unmark, org-agenda-to-appt): Convert ‘if’ without ‘else’ to ‘when,’ or ‘unless’ in the case of “(if (not ...))” (org-batch-agenda-csv): Also convert while-catch to dolist. (org-agenda-prepare): Also simplify a quasiquoted structure. (org-agenda-entry-text-hide): Also convert a bogus ‘mapcar’ to ‘mapc’. (org-compile-prefix-format): Also convert sequential ‘if’s to ‘cl-case’.
This commit is contained in:
parent
673165c035
commit
c9dd7a6a9d