diff options
| -rw-r--r-- | lisp/calendar/appt.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/calendar/appt.el b/lisp/calendar/appt.el index 9f527f75096..ab456904fd9 100644 --- a/lisp/calendar/appt.el +++ b/lisp/calendar/appt.el | |||
| @@ -508,7 +508,9 @@ The time should be in either 24 hour format or am/pm format. | |||
| 508 | Optional argument WARNTIME is an integer (or string) giving the number | 508 | Optional argument WARNTIME is an integer (or string) giving the number |
| 509 | of minutes before the appointment at which to start warning. | 509 | of minutes before the appointment at which to start warning. |
| 510 | The default is `appt-message-warning-time'." | 510 | The default is `appt-message-warning-time'." |
| 511 | (interactive "sTime (hh:mm[am/pm]): \nsMessage: | 511 | ;; People who like to delete trailing whitespace: READ THIS. |
| 512 | ;; This whitespace is supposed to be here. | ||
| 513 | (interactive "sTime (hh:mm[am/pm]): \nsMessage: | ||
| 512 | sMinutes before the appointment to start warning: ") | 514 | sMinutes before the appointment to start warning: ") |
| 513 | (unless (string-match appt-time-regexp time) | 515 | (unless (string-match appt-time-regexp time) |
| 514 | (error "Unacceptable time-string")) | 516 | (error "Unacceptable time-string")) |