Commit dd657177 authored by Barry Warsaw's avatar Barry Warsaw

(py-indent-right, py-outdent-left): Watch out for (mark) returning

nil.
parent e7e15c13
...@@ -502,8 +502,11 @@ farther right than the distance the line would be indented by ...@@ -502,8 +502,11 @@ farther right than the distance the line would be indented by
current line." current line."
(interactive (interactive
(let ((p (point)) (let ((p (point))
(m (mark))) (m (mark))
(list (min p m) (max p m) (prefix-numeric-value current-prefix-arg)))) (arg (prefix-numeric-value current-prefix-arg)))
(if m
(list (min p m) (max p m) arg)
(list p m arg))))
(let ((pos (- (point-max) (point))) (let ((pos (- (point-max) (point)))
(end (save-excursion (end (save-excursion
(goto-char (or end (1+ start))) (goto-char (or end (1+ start)))
...@@ -535,8 +538,11 @@ farther left than column zero. With no active region, outdent only ...@@ -535,8 +538,11 @@ farther left than column zero. With no active region, outdent only
the current line." the current line."
(interactive (interactive
(let ((p (point)) (let ((p (point))
(m (mark))) (m (mark))
(list (min p m) (max p m) (prefix-numeric-value current-prefix-arg)))) (arg (prefix-numeric-value current-prefix-arg)))
(if m
(list (min p m) (max p m) arg)
(list p m arg))))
(let ((pos (- (point-max) (point))) (let ((pos (- (point-max) (point)))
(end (save-excursion (end (save-excursion
(goto-char (or end (1+ start))) (goto-char (or end (1+ start)))
......
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