From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: martin rudalics Newsgroups: gmane.emacs.devel Subject: Re: Select and Paste Date: Sun, 03 Dec 2006 11:04:58 +0100 Message-ID: <4572A14A.8070408@gmx.at> References: <456E3547.3030606@student.lu.se> <4571D9A6.8010604@gmx.at> NNTP-Posting-Host: dough.gmane.org Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="------------090503060507020202050902" X-Trace: sea.gmane.org 1165140513 30803 80.91.229.10 (3 Dec 2006 10:08:33 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Sun, 3 Dec 2006 10:08:33 +0000 (UTC) Cc: lennart.borgman.073@student.lu.se, eliz@gnu.org, emacs-devel@gnu.org Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Sun Dec 03 11:08:31 2006 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by dough.gmane.org with esmtp (Exim 4.50) id 1GqoGs-00026Z-Ok for ged-emacs-devel@m.gmane.org; Sun, 03 Dec 2006 11:08:31 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1GqoGs-0008H3-4l for ged-emacs-devel@m.gmane.org; Sun, 03 Dec 2006 05:08:30 -0500 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1GqoG2-0008Fy-Te for emacs-devel@gnu.org; Sun, 03 Dec 2006 05:07:39 -0500 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1GqoG0-0008EA-Rq for emacs-devel@gnu.org; Sun, 03 Dec 2006 05:07:38 -0500 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1GqoFz-0008Db-VG for emacs-devel@gnu.org; Sun, 03 Dec 2006 05:07:36 -0500 Original-Received: from [213.165.64.20] (helo=mail.gmx.net) by monty-python.gnu.org with smtp (Exim 4.52) id 1GqoFz-0004CU-2y for emacs-devel@gnu.org; Sun, 03 Dec 2006 05:07:35 -0500 Original-Received: (qmail invoked by alias); 03 Dec 2006 10:07:33 -0000 Original-Received: from M3121P024.adsl.highway.telekom.at (EHLO [88.117.38.24]) [88.117.38.24] by mail.gmx.net (mp040) with SMTP; 03 Dec 2006 11:07:33 +0100 X-Authenticated: #14592706 User-Agent: Mozilla Thunderbird 1.0 (Windows/20041206) X-Accept-Language: de-DE, de, en-us, en Original-To: rms@gnu.org In-Reply-To: X-Y-GMX-Trusted: 0 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:63243 Archived-At: This is a multi-part message in MIME format. --------------090503060507020202050902 Content-Type: text/plain; charset=ISO-8859-15; format=flowed Content-Transfer-Encoding: 7bit Could people try whether the attached patch gives good results? --------------090503060507020202050902 Content-Type: text/plain; name="menu-bar.patch" Content-Transfer-Encoding: 7bit Content-Disposition: inline; filename="menu-bar.patch" *** menu-bar.el.~1.296.~ Sun Nov 19 18:04:18 2006 --- menu-bar.el Sun Dec 3 11:00:30 2006 *************** *** 502,512 **** ;; These are alternative definitions for the cut, paste and copy ;; menu items. Use them if your system expects these to use the clipboard. ! (put 'clipboard-kill-region 'menu-enable 'mark-active) (put 'clipboard-kill-ring-save 'menu-enable 'mark-active) (put 'clipboard-yank 'menu-enable ! '(or (and (fboundp 'x-selection-exists-p) (x-selection-exists-p)) ! (x-selection-exists-p 'CLIPBOARD))) (defun clipboard-yank () "Insert the clipboard contents, or the last stretch of killed text." --- 502,515 ---- ;; These are alternative definitions for the cut, paste and copy ;; menu items. Use them if your system expects these to use the clipboard. ! (put 'clipboard-kill-region 'menu-enable ! '(and mark-active (not buffer-read-only))) (put 'clipboard-kill-ring-save 'menu-enable 'mark-active) (put 'clipboard-yank 'menu-enable ! '(and (or (and (fboundp 'x-selection-exists-p) ! (x-selection-exists-p)) ! (x-selection-exists-p 'CLIPBOARD)) ! (not buffer-read-only))) (defun clipboard-yank () "Insert the clipboard contents, or the last stretch of killed text." --------------090503060507020202050902 Content-Type: text/plain; charset="us-ascii" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit Content-Disposition: inline _______________________________________________ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel --------------090503060507020202050902--