Lines Matching defs:end
63 ;; KP2 next or previous end-of-line x x
64 ;; Control-e current end-of-line x
79 ;; when the cursor is moved past the end of a line, spaces or tabs are
127 just like TPU/edt. Otherwise, backward-char will move to the end of
187 (picture-end-of-line)
223 (defun tpu-next-end-of-line (num)
224 "Move to end of line; if at end, move to end of next line.
231 (picture-end-of-line)
232 (if (<= (point) beg) (progn (forward-line) (picture-end-of-line)))))
235 (end-of-line num)))
238 (defun tpu-previous-end-of-line (num)
244 (picture-end-of-line (- 1 num)))
246 (end-of-line (- 1 num))))
249 (defun tpu-current-end-of-line nil
250 "Move point to end of current line."
253 (if tpu-cursor-free (picture-end-of-line) (end-of-line))
254 (if (= beg (point)) (message "You are already at the end of a line."))))