Kaydet (Commit) f2389a0b authored tarafından Barry Warsaw's avatar Barry Warsaw

(py-indent-right, py-outdent-left): fixed placement of point after

adjustments.
üst 43ecf8ee
......@@ -507,7 +507,9 @@ current line."
(if m
(list (min p m) (max p m) arg)
(list p m arg))))
(let ((pos (- (point-max) (point)))
(let* ((dir (= (point) start))
(pos (if dir (point)
(- (point-max) (point))))
(end (save-excursion
(goto-char (or end (1+ start)))
(and (not (bolp))
......@@ -528,7 +530,8 @@ current line."
(indent-to (+ col want))))
(forward-line 1))
(set-marker end nil))
(goto-char (- (point-max) pos))
(goto-char (if dir pos
(- (point-max) pos)))
(py-keep-region-active)))
(defun py-outdent-left (start end arg)
......@@ -543,7 +546,9 @@ the current line."
(if m
(list (min p m) (max p m) arg)
(list p m arg))))
(let ((pos (- (point-max) (point)))
(let* ((dir (= (point) start))
(pos (if dir (point)
(- (point-max) (point))))
(end (save-excursion
(goto-char (or end (1+ start)))
(and (not (bolp))
......@@ -563,7 +568,8 @@ the current line."
(indent-to (- col want))))
(forward-line 1))
(set-marker end nil))
(goto-char (- (point-max) pos))
(goto-char (if dir pos
(- (point-max) pos)))
(py-keep-region-active)))
......
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