Corrected last fix.

lisp/emulation/cua-base.el

@@ -656,13 +656,13 @@ Repeating prefix key when region is active works as a single prefix key."
 	     (integerp arg) (>= arg 0) (< arg 10)
 	     (let* ((prefix (aref (this-command-keys) 0))
 		    (ctrl-u-prefix (and (integerp prefix)
-					(= prefix ?\C-u)))))
-	     (cond 
-	      ((eq cua-enable-register-prefix 'not-ctrl-u)
-	       (not ctrl-u-prefix))
-	      ((eq cua-enable-register-prefix 'ctrl-u-only)
-	       ctrl-u-prefix)
-	      (t t))
+					(= prefix ?\C-u))))
+	       (cond 
+		((eq cua-enable-register-prefix 'not-ctrl-u)
+		 (not ctrl-u-prefix))
+		((eq cua-enable-register-prefix 'ctrl-u-only)
+		 ctrl-u-prefix)
+		(t t)))
 	     (+ arg ?0)))
   (if cua--register nil arg))