Commit c45a6306 authored by Jim Blandy's avatar Jim Blandy
Browse files

* picture.el (move-to-column-force): If column is negative, go

	flush left.
parent 1f3696d7
......@@ -34,6 +34,7 @@
"Move to column COLUMN in current line.
Differs from `move-to-column' in that it creates or modifies whitespace
if necessary to attain exactly the specified column."
(or (natnump column) (setq column 0))
(move-to-column column)
(let ((col (current-column)))
(if (< col column)
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