From c274332afa3c5d28ae43fa280d60fa7c52d5666b Mon Sep 17 00:00:00 2001
From: nyamatongwe <unknown>
Date: Tue, 6 Feb 2001 02:16:11 +0000
Subject: Made SCI_CANPASTE and EM_CANPASTE work correctly using
 IsClipboardFormatAvailable on Windows.

---
 src/Editor.cxx | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'src/Editor.cxx')

diff --git a/src/Editor.cxx b/src/Editor.cxx
index c638ca5b3..67d8ea856 100644
--- a/src/Editor.cxx
+++ b/src/Editor.cxx
@@ -1643,6 +1643,10 @@ void Editor::PasteRectangular(int pos, const char *ptr, int len) {
 	SetEmptySelection(insertPos);
 }
 
+bool Editor::CanPaste() {
+	return !pdoc->IsReadOnly();
+}
+
 void Editor::Clear() {
 	if (currentPos == anchor) {
 		DelChar();
@@ -3525,7 +3529,7 @@ long Editor::WndProc(unsigned int iMessage, unsigned long wParam, long lParam) {
 
 	case EM_CANPASTE:
 	case SCI_CANPASTE:
-		return !pdoc->IsReadOnly();
+		return CanPaste();
 
 	case EM_CHARFROMPOS: {
 			if (lParam == 0)
-- 
cgit v1.2.3