>From 830d6dc5dc758aaa80a9aad08423daf8b060f026 Mon Sep 17 00:00:00 2001 From: Ivan Kanis Date: Sun, 10 Apr 2011 11:06:01 +0200 Subject: [PATCH 14/14] fix logic bug --- appt.el | 4 ++-- 1 files changed, 2 insertions(+), 2 deletions(-) diff --git a/appt.el b/appt.el index c3cc429..b86d657 100644 --- a/appt.el +++ b/appt.el @@ -368,9 +368,9 @@ displayed in a window: (appt-check-appointment (car ac-appt-list) ac-cur-time)) (when ac-min-to-app (setq ac-msg (cadr (car ac-appt-list))) - (add-to-list 'ac-msg-list ac-msg)) + (add-to-list 'ac-msg-list ac-msg) (when (not ac-first) - (setq ac-first (list ac-min-to-app ac-msg))) + (setq ac-first (list ac-min-to-app ac-msg)))) (setq ac-appt-list (cdr ac-appt-list))) ;; Display messages -- 1.7.3.2