From 782ca5f46d192963489b74897e76ca5e4bfa6453 Mon Sep 17 00:00:00 2001
From: Vadim Lopatin <coolreader.org@gmail.com>
Date: Thu, 5 Oct 2017 14:05:08 +0300
Subject: [PATCH] fix clipboard paste operation - normalize line endings -
 close #473

---
 src/dlangui/core/types.d               | 28 ++++++++++++++++++++++++++
 src/dlangui/platforms/windows/winapp.d |  2 +-
 views/DLANGUI_VERSION                  |  2 +-
 3 files changed, 30 insertions(+), 2 deletions(-)

diff --git a/src/dlangui/core/types.d b/src/dlangui/core/types.d
index b99460f6..260f38cb 100644
--- a/src/dlangui/core/types.d
+++ b/src/dlangui/core/types.d
@@ -560,3 +560,31 @@ string toUTF8(dstring str) {
     }
     return cast(string)buf;
 }
+
+/// normalize end of line style - convert to '\n'
+dstring normalizeEndOfLineCharacters(dstring s) {
+    bool crFound = false;
+    foreach(ch; s) {
+        if (ch == '\r') {
+            crFound = true;
+            break;
+        }
+    }
+    if (!crFound)
+        return s;
+    dchar[] res;
+    res.reserve(s.length);
+    dchar prevCh = 0;
+    foreach(ch; s) {
+        if (ch == '\r') {
+            res ~= '\n';
+        } else if (ch == '\n') {
+            if (prevCh != '\r')
+                res ~= '\n';
+        } else {
+            res ~= ch;
+        }
+        prevCh = ch;
+    }
+    return cast(dstring)res;
+}
diff --git a/src/dlangui/platforms/windows/winapp.d b/src/dlangui/platforms/windows/winapp.d
index 4d2781bd..78497544 100644
--- a/src/dlangui/platforms/windows/winapp.d
+++ b/src/dlangui/platforms/windows/winapp.d
@@ -1185,7 +1185,7 @@ class Win32Platform : Platform {
             if (lptstr != NULL) 
             { 
                 wstring w = fromWStringz(lptstr);
-                res = toUTF32(w);
+                res = normalizeEndOfLineCharacters(toUTF32(w));
 
                 GlobalUnlock(hglb); 
             } 
diff --git a/views/DLANGUI_VERSION b/views/DLANGUI_VERSION
index 9deea1ea..ce7dbb52 100644
--- a/views/DLANGUI_VERSION
+++ b/views/DLANGUI_VERSION
@@ -1 +1 @@
-v0.9.159
\ No newline at end of file
+v0.9.160
\ No newline at end of file