Lines Matching +defs:current +defs:column
75 (or (current-local-map)
77 (define-key (current-local-map)
99 (defun to-col (column)
100 (indent-to column 0))
115 (if (null current-prefix-arg) 1
116 (if (listp current-prefix-arg) (car current-prefix-arg)
117 (if (eq current-prefix-arg '-) -1
118 current-prefix-arg))))
148 (defun move-to-comment-column ()
149 (indent-to comment-column))
201 (let ((column (current-indentation)))
203 (indent-to column)))
211 (defun ml-current-column ()
212 (1+ (current-column)))
214 (defun ml-current-indent ()
215 (1+ (current-indentation)))
381 (defun split-current-window ()
392 (move-to-column (1- x)))