fix last patch

This commit is contained in:
Sam Steingold 2013-01-31 17:37:54 -05:00
parent 20a8c47792
commit 1e77b18e33

View file

@ -805,7 +805,7 @@ other words, it will work just like `just-one-space' command."
;; otherwise delete all excees spaces.
(delete-region (if (and (not single-shot) (zerop n) (= mid end))
start mid) end)
(insert (make-string ?\s n))))
(insert (make-string n ?\s))))
;; Command run for the second time.
((not (equal orig-pos (point)))