1 files changed, 1 insertions, 1 deletions

diff --git a/lisp/calendar/diary-lib.el b/lisp/calendar/diary-lib.el
index 73f8315d086..81fafcd695a 100644
--- a/lisp/calendar/diary-lib.el
+++ b/lisp/calendar/diary-lib.el
@@ -734,7 +734,7 @@ is marked.  See the documentation for the function `list-sexp-diary-entries'."
            (list m (calendar-last-day-of-month m y) y)))
     (goto-char (point-min))
     (while (re-search-forward s-entry nil t)
-      (if (char-equal (preceding-char) ?()
+      (if (char-equal (preceding-char) ?\()
           (setq marking-diary-entry t)
         (setq marking-diary-entry nil))
       (re-search-backward "(")