From c1cdea1a7925500bf8c3b005cd965d3b877bcfc5 Mon Sep 17 00:00:00 2001 From: "Kim F. Storm" Date: Fri, 10 May 2002 11:21:10 +0000 Subject: [PATCH] (cua-enable-cua-keys) (cua-enable-register-prefix): Added value for `other' choice. --- lisp/emulation/cua-base.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/emulation/cua-base.el b/lisp/emulation/cua-base.el index 354bc6fff60..95423ea5ff1 100644 --- a/lisp/emulation/cua-base.el +++ b/lisp/emulation/cua-base.el @@ -259,7 +259,7 @@ a shifted movement key. If the value is nil, these keys are never enabled." :type '(choice (const :tag "Disabled" nil) (const :tag "Shift region only" shift) - (other :tag "Enabled")) + (other :tag "Enabled" t)) :group 'cua) (defcustom cua-highlight-region-shift-only nil @@ -301,7 +301,7 @@ interpreted as a register number." :type '(choice (const :tag "Disabled" nil) (const :tag "Enabled, but C-u arg is not a register" not-ctrl-u) (const :tag "Enabled, but only for C-u arg" ctrl-u-only) - (other :tag "Enabled")) + (other :tag "Enabled" t)) :group 'cua) (defcustom cua-delete-copy-to-register-0 t -- 2.39.5