comparison lisp/calendar/appt.el @ 5714:9f37f85000d8

(appt-display-interval, appt-display-duration) (appt-message-warning-time): Use larger defaults.
author Richard M. Stallman <rms@gnu.org>
date Tue, 01 Feb 1994 00:00:36 +0000
parents 139b23d6a97b
children 9a33af7247e2
comparison
equal deleted inserted replaced
5713:76d9b1408e5c 5714:9f37f85000d8
123 "*Non-nil means check for appointments in the diary buffer. 123 "*Non-nil means check for appointments in the diary buffer.
124 To be detected, the diary entry must have the time 124 To be detected, the diary entry must have the time
125 as the first thing on a line.") 125 as the first thing on a line.")
126 126
127 ;;;###autoload 127 ;;;###autoload
128 (defvar appt-message-warning-time 10 128 (defvar appt-message-warning-time 12
129 "*Time in minutes before an appointment that the warning begins.") 129 "*Time in minutes before an appointment that the warning begins.")
130 130
131 ;;;###autoload 131 ;;;###autoload
132 (defvar appt-audible t 132 (defvar appt-audible t
133 "*Non-nil means beep to indicate appointment.") 133 "*Non-nil means beep to indicate appointment.")
143 ;;;###autoload 143 ;;;###autoload
144 (defvar appt-msg-window t 144 (defvar appt-msg-window t
145 "*Non-nil means display appointment message in another window.") 145 "*Non-nil means display appointment message in another window.")
146 146
147 ;;;###autoload 147 ;;;###autoload
148 (defvar appt-display-duration 5 148 (defvar appt-display-duration 10
149 "*The number of seconds an appointment message is displayed.") 149 "*The number of seconds an appointment message is displayed.")
150 150
151 ;;;###autoload 151 ;;;###autoload
152 (defvar appt-display-diary t 152 (defvar appt-display-diary t
153 "*Non-nil means to display the next days diary on the screen. 153 "*Non-nil means to display the next days diary on the screen.
160 The number before each time/message is the time in minutes from midnight.") 160 The number before each time/message is the time in minutes from midnight.")
161 161
162 (defconst max-time 1439 162 (defconst max-time 1439
163 "11:59pm in minutes - number of minutes in a day minus 1.") 163 "11:59pm in minutes - number of minutes in a day minus 1.")
164 164
165 (defvar appt-display-interval 1 165 (defvar appt-display-interval 3
166 "*Number of minutes to wait between checking the appointment list.") 166 "*Number of minutes to wait between checking the appointment list.")
167 167
168 (defvar appt-buffer-name " *appt-buf*" 168 (defvar appt-buffer-name " *appt-buf*"
169 "Name of the appointments buffer.") 169 "Name of the appointments buffer.")
170 170