From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: =?ISO-8859-1?Q?Jan_Dj=E4rv?= Newsgroups: gmane.emacs.devel Subject: Re: Should drag and drop adhere to `mouse-yank-at-point'? Date: Mon, 21 Aug 2006 19:42:57 +0200 Message-ID: <44E9F0A1.6050908@swipnet.se> References: <87fyi4y7sx.fsf@forcix.kollektiv-hamburg.de> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1; format=flowed Content-Transfer-Encoding: 7bit X-Trace: sea.gmane.org 1156182312 30218 80.91.229.2 (21 Aug 2006 17:45:12 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Mon, 21 Aug 2006 17:45:12 +0000 (UTC) Cc: emacs-devel@gnu.org, Jorgen Schaefer Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Mon Aug 21 19:45:07 2006 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1GFDoO-0005JA-V4 for ged-emacs-devel@m.gmane.org; Mon, 21 Aug 2006 19:43:45 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1GFDoO-0001jL-Ew for ged-emacs-devel@m.gmane.org; Mon, 21 Aug 2006 13:43:44 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1GFDo9-0001gt-H4 for emacs-devel@gnu.org; Mon, 21 Aug 2006 13:43:29 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1GFDo8-0001fl-Bu for emacs-devel@gnu.org; Mon, 21 Aug 2006 13:43:29 -0400 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1GFDo8-0001fc-5p for emacs-devel@gnu.org; Mon, 21 Aug 2006 13:43:28 -0400 Original-Received: from [81.228.9.184] (helo=av8-2-sn3.vrr.skanova.net) by monty-python.gnu.org with esmtp (Exim 4.52) id 1GFDvY-0001wv-O1 for emacs-devel@gnu.org; Mon, 21 Aug 2006 13:51:08 -0400 Original-Received: by av8-2-sn3.vrr.skanova.net (Postfix, from userid 502) id 20E7737E69; Mon, 21 Aug 2006 19:43:26 +0200 (CEST) Original-Received: from smtp3-1-sn3.vrr.skanova.net (smtp3-1-sn3.vrr.skanova.net [81.228.9.101]) by av8-2-sn3.vrr.skanova.net (Postfix) with ESMTP id 12A4437E4E; Mon, 21 Aug 2006 19:43:26 +0200 (CEST) Original-Received: from coolsville.localdomain (81-235-205-204-no59.tbcn.telia.com [81.235.205.204]) by smtp3-1-sn3.vrr.skanova.net (Postfix) with ESMTP id CA7F637E4E; Mon, 21 Aug 2006 19:43:25 +0200 (CEST) User-Agent: Thunderbird 1.5.0.5 (Macintosh/20060719) Original-To: "Kim F. Storm" In-Reply-To: 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:58655 Archived-At: Kim F. Storm skrev: > Did anyone consider this? > > I guess it is OK. A bit unusual that dropped things don't end up at the cursor position, but then again, if you set mouse-yank-at-point you probably know what you are doing. Shall I check it in, or will you? Jan D. > Jorgen Schaefer writes: > >> Hi there! >> >> Currently, dragging a piece of text into Emacs will insert the >> text where the drag button was released, even when >> `mouse-yank-at-point' is non-nil. Is this intended behavior? >> >> If so, could a new customize option for this be added? >> If not, the fix is trivial: >> >> *** lisp/x-dnd.el.orig Sat Jun 17 01:51:29 2006 >> --- lisp/x-dnd.el Sat Jun 17 01:52:24 2006 >> *************** >> *** 319,325 **** >> ;; If dropping in an ordinary window which we could use, >> ;; let dnd-open-file-other-window specify what to do. >> (progn >> ! (goto-char (posn-point (event-start event))) >> (funcall handler window action data)) >> ;; If we can't display the file here, >> ;; make a new window for it. >> --- 319,326 ---- >> ;; If dropping in an ordinary window which we could use, >> ;; let dnd-open-file-other-window specify what to do. >> (progn >> ! (when (not mouse-yank-at-point) >> ! (goto-char (posn-point (event-start event)))) >> (funcall handler window action data)) >> ;; If we can't display the file here, >> ;; make a new window for it. >> >> >> Regards, >> -- Jorgen >> >> -- >> ((email . "forcer@forcix.cx") (www . "http://www.forcix.cx/") >> (gpg . "1024D/028AF63C") (irc . "nick forcer on IRCnet")) >