1 files changed, 2 insertions, 2 deletions

diff --git a/lisp/calendar/appt.el b/lisp/calendar/appt.el
index 29e6fe56b6e..892c76bba0c 100644
--- a/lisp/calendar/appt.el
+++ b/lisp/calendar/appt.el
@@ -394,8 +394,8 @@ displayed in a window:
                 (if (and (< appt-comp-time appt-message-warning-time)
                          (> (+ cur-comp-time appt-message-warning-time)
                             appt-max-time))
-                    (setq min-to-app (+ (- (1+ appt-max-time) cur-comp-time))
-                          appt-comp-time))
+                    (setq min-to-app (+ (- (1+ appt-max-time) cur-comp-time)
+                          appt-comp-time)))
 
                 ;; issue warning if the appointment time is
                 ;; within appt-message-warning time