Надоело вручную цопипастить куски текста для квотирования, накостылял велосипед. Обосрите/найдите косяки чтоли. (defun quote-selection () "pastes selection prefixed by > to end of input to comment on that" (interactive) (kill-ring-save (point) (mark)) (goto-char (point-max)) (insert "> ") (yank) (insert (kbd "C-j")) )