Commit 9fff1858 authored by Fabián Ezequiel Gallina's avatar Fabián Ezequiel Gallina Committed by Fabián Ezequiel Gallina
Browse files

Implemented python-nav-backward-sentence, python-nav-forward-sentence

Also small fixes to python-nav-sentence-start and
python-nav-sentence-end were added.
parent 3697b531
......@@ -189,6 +189,13 @@
(defvar python-mode-map
(let ((map (make-sparse-keymap)))
;; Movement
(substitute-key-definition 'backward-sentence
map global-map)
(substitute-key-definition 'forward-sentence
map global-map)
;; Indent specific
(define-key map "\177" 'python-indent-dedent-line-backspace)
(define-key map (kbd "<backtab>") 'python-indent-dedent-line)
......@@ -957,6 +964,7 @@ Returns nil if point is not in a def or class."
(forward-line -1)
(python-info-ppss-context 'string)
(python-info-ppss-context 'paren))
(forward-line -1)))))
......@@ -967,9 +975,35 @@ Returns nil if point is not in a def or class."
(not (eobp))
(when (or
(python-info-ppss-context 'string)
(python-info-ppss-context 'paren))
(forward-line 1)))))
(defun python-nav-backward-sentence (&optional arg)
"Move backward to start of sentence. With arg, do it arg times.
See `python-nav-forward-sentence' for more information."
(interactive "^p")
(or arg (setq arg 1))
(python-nav-forward-sentence (- arg)))
(defun python-nav-forward-sentence (&optional arg)
"Move forward to next end of sentence. With argument, repeat.
With negative argument, move backward repeatedly to start of sentence."
(interactive "^p")
(or arg (setq arg 1))
(while (> arg 0)
(forward-comment 9999)
(forward-line 1)
(setq arg (1- arg)))
(while (< arg 0)
(forward-comment -9999)
(forward-line -1)
(setq arg (1+ arg))))
;;; Shell integration
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment