From: Michael Mauger <mmaug@yahoo.com>
Subject: cua: quiet warning messages
Date: Mon, 16 Jun 2003 10:04:21 -0700 (PDT) [thread overview]
Message-ID: <20030616170421.37652.qmail@web80512.mail.yahoo.com> (raw)
I've noticed that when CUA starts up under 21.3.50 that it issues warning
messages when delete-selection-mode and pc-selection-mode are disabled.
Actually the error is issued by the modes themselves. The warnings are:
Toggling delete-selection-mode off; better pass an explicit argument.
Toggling pc-selection-mode off; better pass an explicit argument.
This patch corrects this by passing the explicit argument.
Index: emacs/lisp/emulation/cua-base.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/emulation/cua-base.el,v
retrieving revision 1.24
diff -b -u -r1.24 cua-base.el
--- emacs/lisp/emulation/cua-base.el 18 Apr 2003 22:49:20 -0000 1.24
+++ emacs/lisp/emulation/cua-base.el 14 Jun 2003 23:20:19 -0000
@@ -1204,9 +1204,9 @@
(and (boundp 'delete-selection-mode) delete-selection-mode)
(and (boundp 'pc-selection-mode) pc-selection-mode)))
(if (and (boundp 'delete-selection-mode) delete-selection-mode)
- (delete-selection-mode))
+ (delete-selection-mode -1))
(if (and (boundp 'pc-selection-mode) pc-selection-mode)
- (pc-selection-mode))
+ (pc-selection-mode -1))
(setq transient-mark-mode (and cua-mode
(if cua-highlight-region-shift-only
(not cua--explicit-region-start)
__________________________________
Do you Yahoo!?
SBC Yahoo! DSL - Now only $29.95 per month!
http://sbc.yahoo.com
next reply other threads:[~2003-06-16 17:04 UTC|newest]
Thread overview: 8+ messages / expand[flat|nested] mbox.gz Atom feed top
2003-06-16 17:04 Michael Mauger [this message]
2003-06-16 18:47 ` cua: quiet warning messages Luc Teirlinck
2003-06-16 19:12 ` Stefan Monnier
2003-06-16 19:41 ` Luc Teirlinck
2003-06-22 3:01 ` Richard Stallman
2003-06-23 17:00 ` Stefan Monnier
2003-07-01 15:17 ` Richard Stallman
2003-07-04 0:47 ` Stefan Monnier
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.gnu.org/software/emacs/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=20030616170421.37652.qmail@web80512.mail.yahoo.com \
--to=mmaug@yahoo.com \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).