From mboxrd@z Thu Jan 1 00:00:00 1970 From: Bastien Subject: Re: [PATCH] org-compat: Support for getting data from Windows clipboard Date: Tue, 19 Nov 2013 10:40:11 +0100 Message-ID: <87r4achgqs.fsf@bzg.ath.cx> References: <878uwn7837.fsf@bzg.ath.cx> <871u2et621.fsf@bzg.ath.cx> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:33402) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1VihnF-0006gN-5V for emacs-orgmode@gnu.org; Tue, 19 Nov 2013 04:40:33 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Vihn6-0006Dp-7D for emacs-orgmode@gnu.org; Tue, 19 Nov 2013 04:40:24 -0500 Received: from mail-we0-x234.google.com ([2a00:1450:400c:c03::234]:40432) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Vihn6-0006Dd-0K for emacs-orgmode@gnu.org; Tue, 19 Nov 2013 04:40:16 -0500 Received: by mail-we0-f180.google.com with SMTP id u56so152832wes.11 for ; Tue, 19 Nov 2013 01:40:15 -0800 (PST) In-Reply-To: (Alexander Vorobiev's message of "Mon, 18 Nov 2013 22:53:16 -0600") List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: Alexander Vorobiev Cc: Fabrice Popineau , emacs-orgmode --=-=-= Content-Type: text/plain Hi Alexander, can you test the attached patch and let me know if it works for you? Thanks, --=-=-= Content-Type: text/x-diff Content-Disposition: attachment; filename=x-select-w32.patch diff --git a/lisp/org-compat.el b/lisp/org-compat.el index b714f13..2eea724 100644 --- a/lisp/org-compat.el +++ b/lisp/org-compat.el @@ -350,7 +350,8 @@ Works on both Emacs and XEmacs." (or (x-get-selection value 'UTF8_STRING) (x-get-selection value 'COMPOUND_TEXT) (x-get-selection value 'STRING) - (x-get-selection value 'TEXT)) + (x-get-selection value 'TEXT) + (x-get-selection-value)) (error nil))))) (defun org-propertize (string &rest properties) --=-=-= Content-Type: text/plain -- Bastien --=-=-=--