# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1257721549 0
# Node ID b3189a049bbff1d26044758dcb86f10dccf21fe4
# Parent  0a019b48e945e78336398013a0ad9e823b0512dd
* emulation/cua-base.el: Add CUA property to some CC mode commands
(Bug#4100).

diff -r 0a019b48e945 -r b3189a049bbf lisp/ChangeLog
--- a/lisp/ChangeLog	Sun Nov 08 23:01:45 2009 +0000
+++ b/lisp/ChangeLog	Sun Nov 08 23:05:49 2009 +0000
@@ -8,6 +8,9 @@
 	* cedet/semantic/ctxt.el (semantic-get-local-variables): Disable
 	the progress reporter entirely.
 
+	* emulation/cua-base.el: Add CUA property to some CC mode commands
+	(Bug#4100).
+
 2009-11-08  Kevin Ryde  <user42@zip.com.au>
 
 	* emacs-lisp/checkdoc.el (checkdoc-proper-noun-regexp): Match noun
diff -r 0a019b48e945 -r b3189a049bbf lisp/emulation/cua-base.el
--- a/lisp/emulation/cua-base.el	Sun Nov 08 23:01:45 2009 +0000
+++ b/lisp/emulation/cua-base.el	Sun Nov 08 23:05:49 2009 +0000
@@ -1504,7 +1504,12 @@
    forward-sexp backward-sexp
    forward-list backward-list
    forward-sentence backward-sentence
-   forward-paragraph backward-paragraph))
+   forward-paragraph backward-paragraph
+   ;; CC mode motion commands
+   c-forward-conditional c-backward-conditional
+   c-down-conditional c-up-conditional
+   c-down-conditional-with-else c-up-conditional-with-else
+   c-beginning-of-statement c-end-of-statement))
   (put cmd 'CUA 'move))
 
 ;; State prior to enabling cua-mode