comparison lisp/calendar/appt.el @ 92545:a778bbba3e9a

(appt-issue-message) (appt-message-warning-time, appt-audible, appt-visible) (appt-msg-window, appt-display-mode-line, appt-display-duration) (appt-display-diary): Remove autoload cookies.
author Glenn Morris <rgm@gnu.org>
date Fri, 07 Mar 2008 04:41:23 +0000
parents 107ccd98fa12
children 2d599418bddb
comparison
equal deleted inserted replaced
92544:e4e52ad20e26 92545:a778bbba3e9a
78 ;; Make sure calendar is loaded when we compile this. 78 ;; Make sure calendar is loaded when we compile this.
79 (require 'calendar) 79 (require 'calendar)
80 80
81 (defvar diary-selective-display) 81 (defvar diary-selective-display)
82 82
83 ;;;###autoload
84 (defcustom appt-issue-message t 83 (defcustom appt-issue-message t
85 "Non-nil means check for appointments in the diary buffer. 84 "Non-nil means check for appointments in the diary buffer.
86 To be detected, the diary entry must have the format described in the 85 To be detected, the diary entry must have the format described in the
87 documentation of the function `appt-check'." 86 documentation of the function `appt-check'."
88 :type 'boolean 87 :type 'boolean
90 89
91 (make-obsolete-variable 'appt-issue-message 90 (make-obsolete-variable 'appt-issue-message
92 "use the function `appt-activate', and the \ 91 "use the function `appt-activate', and the \
93 variable `appt-display-format' instead." "22.1") 92 variable `appt-display-format' instead." "22.1")
94 93
95 ;;;###autoload
96 (defcustom appt-message-warning-time 12 94 (defcustom appt-message-warning-time 12
97 "Time in minutes before an appointment that the warning begins." 95 "Time in minutes before an appointment that the warning begins."
98 :type 'integer 96 :type 'integer
99 :group 'appt) 97 :group 'appt)
100 98
101 ;;;###autoload
102 (defcustom appt-audible t 99 (defcustom appt-audible t
103 "Non-nil means beep to indicate appointment." 100 "Non-nil means beep to indicate appointment."
104 :type 'boolean 101 :type 'boolean
105 :group 'appt) 102 :group 'appt)
106 103
107 ;;;###autoload
108 (defcustom appt-visible t 104 (defcustom appt-visible t
109 "Non-nil means display appointment message in echo area. 105 "Non-nil means display appointment message in echo area.
110 This variable is only relevant if `appt-msg-window' is nil." 106 This variable is only relevant if `appt-msg-window' is nil."
111 :type 'boolean 107 :type 'boolean
112 :group 'appt) 108 :group 'appt)
113 109
114 (make-obsolete-variable 'appt-visible 'appt-display-format "22.1") 110 (make-obsolete-variable 'appt-visible 'appt-display-format "22.1")
115 111
116 ;;;###autoload
117 (defcustom appt-msg-window t 112 (defcustom appt-msg-window t
118 "Non-nil means display appointment message in another window. 113 "Non-nil means display appointment message in another window.
119 If non-nil, this variable overrides `appt-visible'." 114 If non-nil, this variable overrides `appt-visible'."
120 :type 'boolean 115 :type 'boolean
121 :group 'appt) 116 :group 'appt)
140 (const :tag "Backwards compatibility setting - choose another value" 135 (const :tag "Backwards compatibility setting - choose another value"
141 ignore)) 136 ignore))
142 :group 'appt 137 :group 'appt
143 :version "22.1") 138 :version "22.1")
144 139
145 ;;;###autoload
146 (defcustom appt-display-mode-line t 140 (defcustom appt-display-mode-line t
147 "Non-nil means display minutes to appointment and time on the mode line. 141 "Non-nil means display minutes to appointment and time on the mode line.
148 This is in addition to any other display of appointment messages." 142 This is in addition to any other display of appointment messages."
149 :type 'boolean 143 :type 'boolean
150 :group 'appt) 144 :group 'appt)
151 145
152 ;;;###autoload
153 (defcustom appt-display-duration 10 146 (defcustom appt-display-duration 10
154 "The number of seconds an appointment message is displayed. 147 "The number of seconds an appointment message is displayed.
155 Only relevant if reminders are to be displayed in their own window." 148 Only relevant if reminders are to be displayed in their own window."
156 :type 'integer 149 :type 'integer
157 :group 'appt) 150 :group 'appt)
158 151
159 ;;;###autoload
160 (defcustom appt-display-diary t 152 (defcustom appt-display-diary t
161 "Non-nil displays the diary when the appointment list is first initialized. 153 "Non-nil displays the diary when the appointment list is first initialized.
162 This will occur at midnight when the appointment list is updated." 154 This will occur at midnight when the appointment list is updated."
163 :type 'boolean 155 :type 'boolean
164 :group 'appt) 156 :group 'appt)