Lines Matching +defs:current +defs:kill
75 (or (current-local-map)
77 (define-key (current-local-map)
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))))
130 (defun kill-to-end-of-line ()
133 (kill-region (point) (1+ (point)))
134 (kill-region (point) (if (search-forward ?\n nil t)
194 (defun delete-to-kill-buffer ()
195 (kill-region (point) (mark)))
201 (let ((column (current-indentation)))
211 (defun ml-current-column ()
212 (1+ (current-column)))
214 (defun ml-current-indent ()
215 (1+ (current-indentation)))
289 (error (kill-emacs))))
381 (defun split-current-window ()