From ef735ea947833c915043cb093ce996dfc9578a86 Mon Sep 17 00:00:00 2001
From: Raymond <Raymond@3f818213-9676-44b0-a9b4-5e4c4e03d09d>
Date: Tue, 12 Jan 2010 15:38:08 +0000
Subject: [PATCH] Made it so that hints get the "at line x" text aswell.

git-svn-id: http://www.villavu.com/repositories/merlijn/mufasa@402 3f818213-9676-44b0-a9b4-5e4c4e03d09d
---
 Units/MMLAddon/mmlpsthread.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Units/MMLAddon/mmlpsthread.pas b/Units/MMLAddon/mmlpsthread.pas
index b7dffc1..e1f4427 100644
--- a/Units/MMLAddon/mmlpsthread.pas
+++ b/Units/MMLAddon/mmlpsthread.pas
@@ -392,9 +392,9 @@ begin
         with PSScript.CompilerMessages[l] do
           OnError(Row, Pos, MessageToString,errCompile)
       else
-        psWriteln(PSScript.CompilerErrorToStr(l));
+        psWriteln(PSScript.CompilerErrorToStr(l) + ' at line ' + inttostr(PSScript.CompilerMessages[l].Row));
     end else
-      psWriteln(PSScript.CompilerErrorToStr(l));
+      psWriteln(PSScript.CompilerErrorToStr(l) + ' at line ' + inttostr(PSScript.CompilerMessages[l].Row));
 
   end;
 end;