aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/org
diff options
context:
space:
mode:
authorGlenn Morris2018-04-20 18:55:04 -0400
committerGlenn Morris2018-04-20 18:55:04 -0400
commit18de2ada243653ece98b18044233e5d29eee5903 (patch)
treedbac02f9fa7ee6e7f6bd592bd2f775be4cdcf5f6 /lisp/org
parent9c3eeba4db26ddaeead100beea7a96f9fa640918 (diff)
downloademacs-18de2ada243653ece98b18044233e5d29eee5903.tar.gz
emacs-18de2ada243653ece98b18044233e5d29eee5903.zip
More alias-related tedium
* lisp/comint.el (comint-scroll-to-bottom-on-output): * lisp/completion.el (cmpl-syntax-table): * lisp/erc/erc-button.el (erc-button-google-url): * lisp/font-lock.el (font-lock-reference-face): * lisp/hfy-cmap.el (hfy-fallback-colour-map, hfy-rgb-txt-colour-map): * lisp/isearch.el (isearch-regexp-function, isearch-new-word): * lisp/startup.el (argv): * lisp/version.el (emacs-bzr-version): * lisp/org/org.el (org-CUA-compatible) (org-popup-calendar-for-date-prompt): Move aliases before targets, to silence new compiler warning.
Diffstat (limited to 'lisp/org')
-rw-r--r--lisp/org/org.el9
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/org/org.el b/lisp/org/org.el
index 7f4c6d5936b..e45bc55b244 100644
--- a/lisp/org/org.el
+++ b/lisp/org/org.el
@@ -1071,6 +1071,8 @@ has been set."
1071 :group 'org-startup 1071 :group 'org-startup
1072 :type 'boolean) 1072 :type 'boolean)
1073 1073
1074(defvaralias 'org-CUA-compatible 'org-replace-disputed-keys)
1075
1074(defcustom org-replace-disputed-keys nil 1076(defcustom org-replace-disputed-keys nil
1075 "Non-nil means use alternative key bindings for some keys. 1077 "Non-nil means use alternative key bindings for some keys.
1076Org mode uses S-<cursor> keys for changing timestamps and priorities. 1078Org mode uses S-<cursor> keys for changing timestamps and priorities.
@@ -1095,8 +1097,6 @@ loading Org."
1095 :group 'org-startup 1097 :group 'org-startup
1096 :type 'boolean) 1098 :type 'boolean)
1097 1099
1098(defvaralias 'org-CUA-compatible 'org-replace-disputed-keys)
1099
1100(defcustom org-disputed-keys 1100(defcustom org-disputed-keys
1101 '(([(shift up)] . [(meta p)]) 1101 '(([(shift up)] . [(meta p)])
1102 ([(shift down)] . [(meta n)]) 1102 ([(shift down)] . [(meta n)])
@@ -3343,6 +3343,9 @@ This display will be in an overlay, in the minibuffer."
3343 :group 'org-time 3343 :group 'org-time
3344 :type 'boolean) 3344 :type 'boolean)
3345 3345
3346(defvaralias 'org-popup-calendar-for-date-prompt
3347 'org-read-date-popup-calendar)
3348
3346(defcustom org-read-date-popup-calendar t 3349(defcustom org-read-date-popup-calendar t
3347 "Non-nil means pop up a calendar when prompting for a date. 3350 "Non-nil means pop up a calendar when prompting for a date.
3348In the calendar, the date can be selected with mouse-1. However, the 3351In the calendar, the date can be selected with mouse-1. However, the
@@ -3350,8 +3353,6 @@ minibuffer will also be active, and you can simply enter the date as well.
3350When nil, only the minibuffer will be available." 3353When nil, only the minibuffer will be available."
3351 :group 'org-time 3354 :group 'org-time
3352 :type 'boolean) 3355 :type 'boolean)
3353(defvaralias 'org-popup-calendar-for-date-prompt
3354 'org-read-date-popup-calendar)
3355 3356
3356(defcustom org-extend-today-until 0 3357(defcustom org-extend-today-until 0
3357 "The hour when your day really ends. Must be an integer. 3358 "The hour when your day really ends. Must be an integer.