equal
deleted
inserted
replaced
640 (message "scrolling") |
640 (message "scrolling") |
641 |
641 |
642 (defvar my-scroll-margin 4) |
642 (defvar my-scroll-margin 4) |
643 |
643 |
644 (setq-default |
644 (setq-default |
645 ;; Set to zero as this recomment documentation. |
645 ;; Set to zero as this recommend documentation. |
646 scroll-step 0 |
646 scroll-step 0 |
647 ;; If the value is greater than 100, redisplay will never recenter point, but |
647 ;; If the value is greater than 100, redisplay will never recenter point, but |
648 ;; will always scroll just enough text to bring point into view |
648 ;; will always scroll just enough text to bring point into view |
649 scroll-conservatively 1000 |
649 scroll-conservatively 1000 |
650 scroll-preserve-screen-position t |
650 scroll-preserve-screen-position t |