* lisp/emulation/cua-base.el (pc-selection-mode): Declare.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6db7e1eb13f0fa08e645bdbf02ebfbda0394148d..911bee76dbf059d616551e5d46eeb18e6e6e0f14 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2011-02-18  Glenn Morris  <rgm@gnu.org>
 
+       * emulation/cua-base.el (pc-selection-mode): Declare.
+
        * emacs-lisp/eieio-custom.el: Set generated-autoload-file.
        (customize-object): Add autoload cookie.
        * emacs-lisp/eieio-opt.el: Set generated-autoload-file.

diff --git a/lisp/emulation/cua-base.el b/lisp/emulation/cua-base.el
index 267317594b1d1ef65cbf29724fd2b256176dc8fb..0df9e7b16aaccccdab00fc617738b60c34d62a7a 100644 (file)
--- a/lisp/emulation/cua-base.el
+++ b/lisp/emulation/cua-base.el
@@ -1518,6 +1518,9 @@ If ARG is the atom `-', scroll upward by nearly full screen."
    c-beginning-of-statement c-end-of-statement))
   (put cmd 'CUA 'move))
 
+;; Only called if pc-selection-mode is t, which means pc-select is loaded.
+(declare-function pc-selection-mode "pc-select" (&optional arg))
+
 ;; State prior to enabling cua-mode
 ;; Value is a list with the following elements:
 ;;   transient-mark-mode