Fix bad call to error.

diff --git a/lisp/calendar/calendar.el b/lisp/calendar/calendar.el
index 43f878d752b150e35ac26106b231d10fd3b142b0..0713482bfd78e0f0fb938dd289699fc169e5ddd0 100644 (file)
--- a/lisp/calendar/calendar.el
+++ b/lisp/calendar/calendar.el
@@ -2093,7 +2093,7 @@ the STRINGS are just concatenated and the result truncated."
             (not
              (yes-or-no-p
               "Diary modified; do you really want to exit the calendar? ")))
-       (error)
+       (beep)
       ;; Need to do this multiple times because one time can replace some
       ;; calendar-related buffers with other calendar-related buffers
       (mapcar (lambda (x)