* lisp/calendar/calendar.el (calendar-mode): Locally set scroll-margin to 0.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7e5fd5be1c915e32ba1fb3a948c4a0c953ee9a33..f78e5a277b4e69008c6aed1a0dc5da02bee50049 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2012-01-06  Glenn Morris  <rgm@gnu.org>
+
+       * calendar/calendar.el (calendar-mode):
+       Locally set scroll-margin to 0.  (Bug#10379)
+
 2012-01-06  Ulrich Mueller  <ulm@gentoo.org>
 
        * play/doctor.el (doctor-death): Escape "," characters.  (Bug#10370)

diff --git a/lisp/calendar/calendar.el b/lisp/calendar/calendar.el
index 6b20b014e16f9accdbf6c3f4c2894c9b669d9fb8..905600cfb748864b437b9add318a879108fdd9ea 100644 (file)
--- a/lisp/calendar/calendar.el
+++ b/lisp/calendar/calendar.el
@@ -1730,6 +1730,7 @@ For a complete description, see the info node `Calendar/Diary'.
   (setq buffer-read-only t
         buffer-undo-list t
         indent-tabs-mode nil)
+  (set (make-local-variable 'scroll-margin) 0) ; bug#10379
   (calendar-update-mode-line)
   (make-local-variable 'calendar-mark-ring)
   (make-local-variable 'displayed-month) ; month in middle of window