X-Git-Url: http://git.hcoop.net/bpt/emacs.git/blobdiff_plain/ab422c4d6899b1442cb6954c1829c1fb656b006c..51721edc6ba92f9c7cb6a2daab45bb538a696f3d:/lisp/emulation/cua-gmrk.el diff --git a/lisp/emulation/cua-gmrk.el b/lisp/emulation/cua-gmrk.el index d2901bb966..b77b2105f6 100644 --- a/lisp/emulation/cua-gmrk.el +++ b/lisp/emulation/cua-gmrk.el @@ -1,6 +1,6 @@ ;;; cua-gmrk.el --- CUA unified global mark support -;; Copyright (C) 1997-2013 Free Software Foundation, Inc. +;; Copyright (C) 1997-2014 Free Software Foundation, Inc. ;; Author: Kim F. Storm ;; Keywords: keyboard emulations convenience cua mark @@ -25,10 +25,8 @@ ;;; Code: -(eval-when-compile - (require 'cua-base) - (require 'cua-rect) - ) +(require 'cua-base) +(require 'cua-rect) ;;; Global Marker @@ -364,7 +362,6 @@ With prefix argument, don't jump to global mark when canceling it." (define-key cua--global-mark-keymap [remap backward-delete-char] 'cua-delete-backward-char-at-global-mark) (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]