set minimum mode-line position to 1
This commit is contained in:
parent
c37f70c209
commit
7bf64bf3e4
|
@ -250,7 +250,7 @@ Returns the assigned number, or nil on error."
|
||||||
POSITION: position in the mode-line."
|
POSITION: position in the mode-line."
|
||||||
(let ((mode-line (default-value 'mode-line-format))
|
(let ((mode-line (default-value 'mode-line-format))
|
||||||
(res))
|
(res))
|
||||||
(dotimes (i (min (or position window-numbering-mode-line-position)
|
(dotimes (i (min (or position window-numbering-mode-line-position 1)
|
||||||
(length mode-line)))
|
(length mode-line)))
|
||||||
(push (car mode-line) res)
|
(push (car mode-line) res)
|
||||||
(pop mode-line))
|
(pop mode-line))
|
||||||
|
|
Loading…
Reference in a new issue