emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
* [PATCH] org-compat: Support for getting data from Windows clipboard
@ 2013-11-17  0:42 Alexander Vorobiev
  2013-11-17  8:20 ` Bastien
  0 siblings, 1 reply; 10+ messages in thread
From: Alexander Vorobiev @ 2013-11-17  0:42 UTC (permalink / raw)
  To: emacs-orgmode

[-- Attachment #1: Type: text/plain, Size: 1296 bytes --]

I noticed that %x capture template doesn't work under Windows which made my
templates non-portable, so I made this small change to org-get-x-clipboard
to fix that. This is my very first patch, please let me know if it is
acceptable.

Thanks,
Alex

* lisp/org-compat.el (org-get-x-clipboard): Use w32-get-clipboard-data
to get the clipboard data under Windows.

TINYCHANGE
---
 lisp/org-compat.el | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

diff --git a/lisp/org-compat.el b/lisp/org-compat.el
index b714f13..a3eb960 100644
--- a/lisp/org-compat.el
+++ b/lisp/org-compat.el
@@ -190,10 +190,12 @@ If DELETE is non-nil, delete all those overlays."
     found))

 (defun org-get-x-clipboard (value)
-  "Get the value of the x clipboard, compatible with XEmacs, and GNU Emacs
21."
-  (if (eq window-system 'x)
-      (let ((x (org-get-x-clipboard-compat value)))
- (if x (org-no-properties x)))))
+  "Get the value of the x or Windows clipboard, compatible with XEmacs,
and GNU Emacs 21."
+  (cond ((eq window-system 'x)
+ (let ((x (org-get-x-clipboard-compat value)))
+   (if x (org-no-properties x))))
+ ((and (eq window-system 'w32) (fboundp 'w32-get-clipboard-data))
+ (w32-get-clipboard-data))))

 (defsubst org-decompose-region (beg end)
   "Decompose from BEG to END."
--

[-- Attachment #2: Type: text/html, Size: 2006 bytes --]

^ permalink raw reply related	[flat|nested] 10+ messages in thread

end of thread, other threads:[~2013-11-24 21:38 UTC | newest]

Thread overview: 10+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2013-11-17  0:42 [PATCH] org-compat: Support for getting data from Windows clipboard Alexander Vorobiev
2013-11-17  8:20 ` Bastien
2013-11-18  0:31   ` Alexander Vorobiev
2013-11-18  9:25     ` Bastien
2013-11-18 11:34       ` Fabrice Popineau
2013-11-19  4:53         ` Alexander Vorobiev
2013-11-19  9:40           ` Bastien
2013-11-21 23:21             ` Alexander Vorobiev
2013-11-22  9:54               ` Bastien
2013-11-24 21:37                 ` Alexander Vorobiev

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).