Fix backspace-from-2nd-line bug

This commit is contained in:
Henrik Lissner 2014-09-05 18:42:37 -04:00
parent d47ca9bb39
commit ba1b91bc40

View file

@ -32,7 +32,8 @@ afterwards, kill line to column 1."
whitespace as possible, or just one char (using `autopair-backspace') whitespace as possible, or just one char (using `autopair-backspace')
if that's not possible." if that's not possible."
(interactive) (interactive)
(if indent-tabs-mode (if (or indent-tabs-mode
(= (point-at-bol) (point)))
(call-interactively 'backward-delete-char) (call-interactively 'backward-delete-char)
(let ((movement (% (current-column) tab-width)) (let ((movement (% (current-column) tab-width))
(p (point))) (p (point)))