Mercurial > cpython-lru_cache-weakref
diff Misc/python-mode.el @ 3480:827f11ad65df legacy-trunk
(py-indent-right, py-outdent-left): Watch out for (mark) returning
nil.
| author | Barry Warsaw <barry@python.org> |
|---|---|
| date | Mon, 25 Mar 1996 21:24:26 +0000 |
| parents | a292b7583c01 |
| children | 83557153f544 |
line wrap: on
line diff
--- a/Misc/python-mode.el Mon Mar 25 18:54:33 1996 +0000 +++ b/Misc/python-mode.el Mon Mar 25 21:24:26 1996 +0000 @@ -502,8 +502,11 @@ current line." (interactive (let ((p (point)) - (m (mark))) - (list (min p m) (max p m) (prefix-numeric-value current-prefix-arg)))) + (m (mark)) + (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))) (end (save-excursion (goto-char (or end (1+ start))) @@ -535,8 +538,11 @@ the current line." (interactive (let ((p (point)) - (m (mark))) - (list (min p m) (max p m) (prefix-numeric-value current-prefix-arg)))) + (m (mark)) + (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))) (end (save-excursion (goto-char (or end (1+ start)))