mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(python-shift-left, python-shift-right):

Browse source 
When the mark is not active shift the current line.  (Bug#2381)
This commit is contained in:
Martin Rudalics 2009-02-20 16:30:53 +00:00
parent 7b704afe99
commit 3ba6d4ed56
2 changed files with 14 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lisp/ChangeLog
View file

@ -1,3 +1,9 @@
2009-02-20 Martin Rudalics <rudalics@gmx.at>
* progmodes/python.el (python-shift-left, python-shift-right):
When the mark is not active shift the current line. (Bug#2381)
Suggested by Guillaume Salagnac <guillaume.salagnac@gmail.com>
2009-02-20 Andreas Schwab <schwab@suse.de>
* startup.el (command-line): Don't match an empty argument as an

14
lisp/progmodes/python.el
View file

@ -2008,9 +2008,10 @@ COUNT defaults to `python-indent'. If region isn't active, just shift
current line. The region shifted includes the lines in which START and
END lie. It is an error if any lines in the region are indented less than
COUNT columns."
(interactive (if mark-active
(list (region-beginning) (region-end) current-prefix-arg)
(list (point) (point) current-prefix-arg)))
(interactive
(if mark-active
(list (region-beginning) (region-end) current-prefix-arg)
(list (line-beginning-position) (line-end-position) current-prefix-arg)))
(if count
(setq count (prefix-numeric-value count))
(setq count python-indent))
@ -2031,9 +2032,10 @@ COUNT columns."
COUNT defaults to `python-indent'. If region isn't active, just shift
current line. The region shifted includes the lines in which START and
END lie."
(interactive (if mark-active
(list (region-beginning) (region-end) current-prefix-arg)
(list (point) (point) current-prefix-arg)))
(interactive
(if mark-active
(list (region-beginning) (region-end) current-prefix-arg)
(list (line-beginning-position) (line-end-position) current-prefix-arg)))
(if count
(setq count (prefix-numeric-value count))
(setq count python-indent))