[Emacs-diffs] /srv/bzr/emacs/trunk r106610: appt.el trivia.

[Glenn Morris]

------------------------------------------------------------
revno: 106610
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Sun 2011-12-04 11:41:44 -0800
message:
  appt.el trivia.
  
  * lisp/calendar/appt.el (appt-add): Rewrite the interactive-spec to avoid
  overly zealous deletion of trailing whitespace.
modified:
  lisp/ChangeLog
  lisp/calendar/appt.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2011-12-04 17:13:01 +0000
+++ b/lisp/ChangeLog    2011-12-04 19:41:44 +0000
@@ -1,3 +1,8 @@
+2011-12-04  Glenn Morris  <address@hidden>
+
+       * calendar/appt.el (appt-add): Rewrite the interactive-spec to avoid
+       overly zealous deletion of trailing whitespace.
+
 2011-12-04  Juanma Barranquero  <address@hidden>
 
        * server.el (server-delete-client): On Windows, do not try to delete

=== modified file 'lisp/calendar/appt.el'
--- a/lisp/calendar/appt.el     2011-12-04 19:31:41 +0000
+++ b/lisp/calendar/appt.el     2011-12-04 19:41:44 +0000
@@ -508,9 +508,7 @@
 Optional argument WARNTIME is an integer (or string) giving the number
 of minutes before the appointment at which to start warning.
 The default is `appt-message-warning-time'."
-  ;; People who like to delete trailing whitespace: READ THIS.
-  ;; This whitespace is supposed to be here.
-  (interactive "sTime (hh:mm[am/pm]): \nsMessage: 
+  (interactive "sTime (hh:mm[am/pm]): \nsMessage: \n\
 sMinutes before the appointment to start warning: ")
   (unless (string-match appt-time-regexp time)
     (error "Unacceptable time-string"))