Skip to content
Browse files

Changed error string detection for MzScheme.

Cosmetic change in output.


git-svn-id: http://svn.textmate.org/trunk/Bundles/Scheme.tmbundle@2871 dfb7d73b-c2ec-0310-8fea-fb051d288c6d
  • Loading branch information...
1 parent 599dbac commit 6fcb66d53744f8c52b652cbbe91f74ded768bedc Mikael Säker committed Mar 20, 2006
Showing with 3 additions and 3 deletions.
  1. +3 −3 Support/showoutput.rb
View
6 Support/showoutput.rb
@@ -66,13 +66,13 @@ def printoutput(ioport)
def makeerrorlink(line, system)
case system
when "mzscheme"
- a = line.split(':')
+ a = line.split(':', 4)
file = a[0]
line = a[1]
column = a[2]
exp = a[3]
"<tr><td width='50'></td><td><div class='errorinfo'>" +
- File.basename(file) + "line #{line}, column #{column}</div></td>" +
+ File.basename(file) + " line #{line}, column #{column}</div></td>" +
'<td width="30"></td><td><div class="errorexp"><a href="txmt://open?url=file://' +
File.expand_path(a[0]) + '&line=' + line + '&column=' + column + '">' +
escape(exp) + "</a></div></td></tr>"
@@ -88,7 +88,7 @@ def printerrors(errorfile, system)
errors = 1
case system
when "mzscheme"
- if line =~ /^\// then
+ if line =~ /:[0-9]+:[0-9]+:/ then
puts makeerrorlink(line, system)
else
puts "<div class='errorline'>"

0 comments on commit 6fcb66d

Please sign in to comment.
Something went wrong with that request. Please try again.