From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: Le Wang Newsgroups: gmane.emacs.devel Subject: BUG REPORT: "delsel.el" Date: Thu, 27 Feb 2003 19:07:22 -0500 Sender: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Message-ID: NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="nextPart1085731.gaPpjPnoMn" Content-Transfer-Encoding: 7Bit X-Trace: main.gmane.org 1046390959 2655 80.91.224.249 (28 Feb 2003 00:09:19 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Fri, 28 Feb 2003 00:09:19 +0000 (UTC) Return-path: Original-Received: from quimby.gnus.org ([80.91.224.244]) by main.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 18oY5U-0000gR-00 for ; Fri, 28 Feb 2003 01:09:16 +0100 Original-Received: from monty-python.gnu.org ([199.232.76.173]) by quimby.gnus.org with esmtp (Exim 3.12 #1 (Debian)) id 18oYMd-0003rk-00 for ; Fri, 28 Feb 2003 01:26:59 +0100 Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org) by monty-python.gnu.org with esmtp (Exim 4.10.13) id 18oY5Q-00062c-01 for emacs-devel@quimby.gnus.org; Thu, 27 Feb 2003 19:09:12 -0500 Original-Received: from list by monty-python.gnu.org with tmda-scanned (Exim 4.10.13) id 18oY4c-0005ry-00 for emacs-devel@gnu.org; Thu, 27 Feb 2003 19:08:22 -0500 Original-Received: from mail by monty-python.gnu.org with spam-scanned (Exim 4.10.13) id 18oY4Y-0005gf-00 for emacs-devel@gnu.org; Thu, 27 Feb 2003 19:08:19 -0500 Original-Received: from main.gmane.org ([80.91.224.249]) by monty-python.gnu.org with esmtp (Exim 4.10.13) id 18oY4X-0005fe-00 for emacs-devel@gnu.org; Thu, 27 Feb 2003 19:08:17 -0500 Original-Received: from list by main.gmane.org with local (Exim 3.35 #1 (Debian)) id 18oY4D-0000bo-00 for ; Fri, 28 Feb 2003 01:07:57 +0100 X-Injected-Via-Gmane: http://gmane.org/ Original-To: emacs-devel@gnu.org Original-Received: from news by main.gmane.org with local (Exim 3.35 #1 (Debian)) id 18oY4D-0000be-00 for ; Fri, 28 Feb 2003 01:07:57 +0100 Original-Lines: 36 Original-X-Complaints-To: usenet@main.gmane.org User-Agent: KNode/0.7.1 X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1b5 Precedence: list List-Id: Emacs development discussions. List-Help: List-Post: List-Subscribe: , List-Archive: List-Unsubscribe: , Errors-To: emacs-devel-bounces+emacs-devel=quimby.gnus.org@gnu.org Xref: main.gmane.org gmane.emacs.devel:12016 X-Report-Spam: http://spam.gmane.org/gmane.emacs.devel:12016 --nextPart1085731.gaPpjPnoMn Content-Type: text/plain; charset=iso-8859-1 Content-Transfer-Encoding: 8Bit Hi, I gave the `kill-line' symbol a property of 'kill for 'delete-selection. After the region is killed, "delsel.el" attempts to deactivate the region, but of course in transient-mark-mode buffer modification deactivates the region automatically, leading to an error. I've got a patch (see atached), I don't know if it's too simplistic, though. I'm no lisp expert. -- Le --nextPart1085731.gaPpjPnoMn Content-Type: text/x-diff; name="delsel.el.diff" Content-Transfer-Encoding: 8Bit Content-Disposition: attachment; filename="delsel.el.diff" --- temp/delsel_old.el 2003-02-26 08:54:24.000000000 -0500 +++ c:/cygwin/usr/emacs-cvs/lisp/delsel.el 2003-02-26 08:55:08.000000000 -0500 @@ -75,8 +75,9 @@ (if killp (kill-region (point) (mark)) (delete-region (point) (mark))) - (setq mark-active nil) - (run-hooks 'deactivate-mark-hook) + (unless transient-mark-mode + (setq mark-active nil) + (run-hooks 'deactivate-mark-hook)) t) (defun delete-selection-pre-hook () --nextPart1085731.gaPpjPnoMn Content-Type: text/plain; charset="us-ascii" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit _______________________________________________ Emacs-devel mailing list Emacs-devel@gnu.org http://mail.gnu.org/mailman/listinfo/emacs-devel --nextPart1085731.gaPpjPnoMn--