[Emacs-diffs] Changes to emacs/lisp/emulation/cua-rect.el

[Kim F . Storm]

Index: emacs/lisp/emulation/cua-rect.el
diff -c emacs/lisp/emulation/cua-rect.el:1.17 
emacs/lisp/emulation/cua-rect.el:1.18
*** emacs/lisp/emulation/cua-rect.el:1.17       Tue May 17 17:29:06 2005
--- emacs/lisp/emulation/cua-rect.el    Tue May 17 22:39:30 2005
***************
*** 1403,1410 ****
  
  (defun cua--init-rectangles ()
    (unless (eq cua-use-hyper-key 'only)
!     (define-key cua--rectangle-keymap [(shift return)] 
'cua-clear-rectangle-mark)
!     (define-key cua--region-keymap    [(shift return)] 
'cua-toggle-rectangle-mark))
    (when cua-use-hyper-key
      (cua--rect-M/H-key 'space                        
'cua-clear-rectangle-mark)
      (cua--M/H-key cua--region-keymap 'space          
'cua-toggle-rectangle-mark))
--- 1403,1410 ----
  
  (defun cua--init-rectangles ()
    (unless (eq cua-use-hyper-key 'only)
!     (define-key cua--rectangle-keymap [(control return)] 
'cua-clear-rectangle-mark)
!     (define-key cua--region-keymap    [(control return)] 
'cua-toggle-rectangle-mark))
    (when cua-use-hyper-key
      (cua--rect-M/H-key 'space                        
'cua-clear-rectangle-mark)
      (cua--M/H-key cua--region-keymap 'space          
'cua-toggle-rectangle-mark))