;;; Code:
-(require 'picture) ; provides move-to-column-force
(require 'emacsbug)
;;; Variables:
(defun lm-insert-at-column (col &rest strings)
"Insert list of STRINGS, at column COL."
(if (> (current-column) col) (insert "\n"))
- (move-to-column-force col)
+ (move-to-column col t)
(apply 'insert strings))
(defun lm-verify (&optional file showok &optional verb)