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

[Kim F. Storm]

Index: emacs/lisp/emulation/cua-gmrk.el
diff -c emacs/lisp/emulation/cua-gmrk.el:1.2 
emacs/lisp/emulation/cua-gmrk.el:1.3
*** emacs/lisp/emulation/cua-gmrk.el:1.2        Thu May  2 01:30:20 2002
--- emacs/lisp/emulation/cua-gmrk.el    Fri May 24 20:07:26 2002
***************
*** 377,382 ****
--- 377,387 ----
    (define-key cua--global-mark-keymap [remap backward-delete-char-untabify] 
'cua-delete-backward-char-at-global-mark)
    (define-key cua--global-mark-keymap [remap self-insert-command]     
'cua-insert-char-at-global-mark)
    (define-key cua--global-mark-keymap [remap self-insert-iso]         
'cua-insert-char-at-global-mark)
+ 
+   ;; Catch self-inserting characters which are "stolen" by other modes
+   (define-key cua--global-mark-keymap [t]
+     '(menu-item "sic" cua-insert-char-at-global-mark :filter 
cua--self-insert-char-p))
+ 
    (define-key cua--global-mark-keymap [remap newline]                 
'cua-insert-newline-at-global-mark)
    (define-key cua--global-mark-keymap [remap newline-and-indent]      
'cua-insert-newline-at-global-mark)
    (define-key cua--global-mark-keymap "\r"                            
'cua-insert-newline-at-global-mark)