From 72662103746b3e933bb2d686f33dbe064a2c5c19 Mon Sep 17 00:00:00 2001 From: "Kim F. Storm" Date: Wed, 28 Sep 2005 19:16:44 +0000 Subject: [PATCH] Set CUA move property on additional commands: up-list, down-list, backward-up-list, end-of-defun beginning-of-defun, forward-sexp backward-sexp, forward-list, backward-list --- lisp/emulation/cua-base.el | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/lisp/emulation/cua-base.el b/lisp/emulation/cua-base.el index 0e60e60b4c4..dc335a2eb82 100644 --- a/lisp/emulation/cua-base.el +++ b/lisp/emulation/cua-base.el @@ -1324,6 +1324,10 @@ If ARG is the atom `-', scroll upward by nearly full screen." move-end-of-line move-beginning-of-line end-of-buffer beginning-of-buffer scroll-up scroll-down + up-list down-list backward-up-list + end-of-defun beginning-of-defun + forward-sexp backward-sexp + forward-list backward-list forward-sentence backward-sentence forward-paragraph backward-paragraph)) (put cmd 'CUA 'move)) -- 2.39.2