(let ((text-delta (- (first-char-offset) orig-first-char-offset)))
(goto-char (+ orig-point text-delta))
)
+
+ ;; The point should never wind up to the left of indent-column, so
+ ;; if it's there, move it over to indent-column.
+ (if (< (point-offset) indent-column)
+ (goto-char indent-column)
+ )
)
)
)