hedgewars/uConsole.pas
changeset 6990 40e5af28d026
parent 6982 8d41d22a291d
child 7134 beb16926ae5c
--- a/hedgewars/uConsole.pas	Wed May 02 11:28:38 2012 +0200
+++ b/hedgewars/uConsole.pas	Wed May 02 10:53:13 2012 +0100
@@ -97,7 +97,7 @@
     if Length(s) = High(s) then
         Dec(s[0]);
     s[Ord(Length(s))+1] := #0;
-    exit(@s[1]);
+    ShortStringAsPChar:= @s[1];
 end;
 
 function GetLastConsoleLine: shortstring;