From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Richard Stallman Newsgroups: gmane.emacs.devel Subject: Re: transient-mark-mode in 22.0 Date: Wed, 08 Jun 2005 08:02:42 -0400 Message-ID: References: Reply-To: rms@gnu.org NNTP-Posting-Host: main.gmane.org X-Trace: sea.gmane.org 1118232814 12664 80.91.229.2 (8 Jun 2005 12:13:34 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Wed, 8 Jun 2005 12:13:34 +0000 (UTC) Cc: emacs-devel@gnu.org Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Wed Jun 08 14:13:33 2005 Return-path: Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1DfzQG-0006ZP-GA for ged-emacs-devel@m.gmane.org; Wed, 08 Jun 2005 14:12:40 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1DfzWy-0006tG-Gd for ged-emacs-devel@m.gmane.org; Wed, 08 Jun 2005 08:19:36 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1DfzQI-0003DZ-AC for emacs-devel@gnu.org; Wed, 08 Jun 2005 08:12:42 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1DfzQF-0003CK-TL for emacs-devel@gnu.org; Wed, 08 Jun 2005 08:12:40 -0400 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1DfzP1-0002Sx-2i for emacs-devel@gnu.org; Wed, 08 Jun 2005 08:11:23 -0400 Original-Received: from [199.232.76.164] (helo=fencepost.gnu.org) by monty-python.gnu.org with esmtp (Exim 4.34) id 1DfzLq-0003xf-KK for emacs-devel@gnu.org; Wed, 08 Jun 2005 08:08:06 -0400 Original-Received: from rms by fencepost.gnu.org with local (Exim 4.34) id 1DfzGc-0006zB-Jp; Wed, 08 Jun 2005 08:02:42 -0400 Original-To: JD Smith In-reply-to: (message from JD Smith on Mon, 06 Jun 2005 10:24:11 -0700) X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:38319 X-Report-Spam: http://spam.gmane.org/gmane.emacs.devel:38319 I noticed that setting the transient-mark-mode variable no longer does anything As far as I can see, it still does what it always did. Did you actually observe that it fails to work? But I see that the doc string of the variable says that setting it does nothing. That doc string is erroneous. define-minor-mode automatically generates doc strings that say you can't set the variable directly, and often this is true, but sometimes it is false. So I propose the patch below. Your problem with mouse-up is probably unrelated to this. I am not sure whether it is a bug, and I don't have time to look at the issue now. *** easy-mmode.el 05 Jun 2005 05:51:44 -0400 1.64 --- easy-mmode.el 08 Jun 2005 07:00:46 -0400 *************** *** 183,195 **** (let ((curfile (or (and (boundp 'byte-compile-current-file) byte-compile-current-file) ! load-file-name))) ! `(defcustom ,mode ,init-value ! ,(format "Non-nil if %s is enabled. See the command `%s' for a description of this minor-mode. Setting this variable directly does not take effect; ! use either \\[customize] or the function `%s'." ! pretty-name mode mode) :set 'custom-set-minor-mode :initialize 'custom-initialize-default ,@group --- 183,201 ---- (let ((curfile (or (and (boundp 'byte-compile-current-file) byte-compile-current-file) ! load-file-name)) ! base-doc-string) ! (setq base-doc-string "Non-nil if %s is enabled. See the command `%s' for a description of this minor-mode. Setting this variable directly does not take effect; ! use either \\[customize] or the function `%s'.") ! (if (null body) ! (setq base-doc-string "Non-nil if %s is enabled. ! See the command `%s' for a description of this minor-mode.")) ! ! `(defcustom ,mode ,init-value ! (let ! ,(format base-doc-string pretty-name mode mode) :set 'custom-set-minor-mode :initialize 'custom-initialize-default ,@group