(mark-sexp-diary-entries): Add \ for C-M-f's sake.

dbabfd55 · Richard M. Stallman · 67f09a62 · dbabfd55
Commit dbabfd55 authored Sep 25, 1995 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

lisp/calendar/diary-lib.el lisp/calendar/diary-lib.el +1 -1

No files found.
--- 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 "(")