Function: scroll-lock-move-to-column

scroll-lock-move-to-column is a byte-compiled function defined in scroll-lock.el.gz.

Signature

(scroll-lock-move-to-column COLUMN)

Documentation

Like move-to-column but cater for wrapped lines.

Source Code

;; Defined in /usr/src/emacs/lisp/scroll-lock.el.gz
(defun scroll-lock-move-to-column (column)
  "Like `move-to-column' but cater for wrapped lines."
  (if (or (bolp)
	  ;; Start of a screen line.
	  (not (zerop (mod (- (point) (line-beginning-position))
			   (window-width)))))
      (move-to-column column)
    (forward-char (min column (- (line-end-position) (point))))))