(defun hold-line-scroll-up() "Scroll the page with the cursor in the same line" (interactive) (let ((next-screen-context-lines (count-lines (window-start) (window-end)))) (scroll-up))) (global-set-key (kbd "M-N") 'hold-line-scroll-up) ;; (defun hold-line-scroll-down() "Scroll the page with the cu...