From 4da6bd51dddfb4cfef2853756c4d9ab14c0897f1 Mon Sep 17 00:00:00 2001 From: Barry Warsaw Date: Wed, 26 Nov 1997 06:00:26 +0000 Subject: (py-mark-def-or-class): Added an exchange-point-and-mark and a py-keep-region-active so that the marked def/class gets the zmacs-region or transient-mark region highlighted. Also point should be left at the end of the marked region. (py-mode-map): Moved py-mark-def-or-class to M-C-h to conform to Emacs major mode standards. --- Misc/python-mode.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/Misc/python-mode.el b/Misc/python-mode.el index 99795a0..624af01 100644 --- a/Misc/python-mode.el +++ b/Misc/python-mode.el @@ -462,7 +462,7 @@ Currently-active file is at the head of the list.") (define-key py-mode-map [delete] 'py-electric-delete) (define-key py-mode-map [backspace] 'py-electric-backspace)) ;; marking interesting locations - (define-key py-mode-map "\C-c\C-m" 'py-mark-def-or-class) + (define-key py-mode-map "\e\C-h" 'py-mark-def-or-class) (define-key py-mode-map "\C-c\C-k" 'py-mark-block) ;; Miscellaneous (define-key py-mode-map "\C-c:" 'py-guess-indent-offset) @@ -2049,7 +2049,9 @@ pleasant." (re-search-backward "^[ \t]*[^ \t#]" nil 'move) (forward-line 1)) ;; no comment, so go back - (goto-char start)))))))) + (goto-char start))))))) + (exchange-point-and-mark) + (py-keep-region-active)) ;; ripped from cc-mode (defun py-forward-into-nomenclature (&optional arg) -- cgit v0.12