Довольно часто, редактируя тексты я переношу куски из одного файла в другой, или даже делаю это внутри одного файла. И здесь мне всегда пригождается возможность прыгать туда и обратно, которую я тоже подсмотрел в <a href="http://kulchitsky.org/rus/linux/dotemacs.html#language">точках Емакс</a>. Вот как это реализовано (Meta в данном случае можно понимать как ESC), более подробно смотрите у автора. <source lang="lisp"> ;; Итак, я предлагаю команду 'Meta-Meta-Shift-/' для того, чтобы запомнить текущую позицию ;; и команду 'Meta-Meta-/' для того, чтобы перейти ;; на запомненную позицию, прежде запомнив текущую. ;;Toggle between saved positions as in MIM editor (defun save-point-and-switch () "Save current point to register 0 and go to the previously saved position" (interactive) (let (temp) (setq temp (point-marker)) (when (not (equal (get-register 0) nil)) (jump-to-register 0)) (set-register 0 temp)))

;;Save current position to register 0 (defun save-point-only () "Save current point to register 0" (interactive) (set-register 0 (point-marker)))

(global-set-key (kbd "\e\e/") 'save-point-and-switch) (global-set-key (kbd "\e\e?") 'save-point-only) </source>