fix some line ending issues and add a license header to wmessages.pas
[lcore.git] / lmessages.pas
index 3aafdca70b52e0287a725a50fa36f4cd371502a3..9807e42dc01db88cf262b8ae67e0df45926daf17 100755 (executable)
@@ -409,11 +409,11 @@ begin
       //we have to get the window procedure while the structurelock\r
       //is still held as the window could be destroyed from another thread\r
       //otherwise.\r
-      if window <> nil then begin
+      if window <> nil then begin\r
         windowproc := window.windowproc;\r
-      end else begin
-        windowproc := nil;
-      end;
+      end else begin\r
+        windowproc := nil;\r
+      end;\r
     finally\r
       structurelock.release;\r
     end;\r