From aab0ec209b5427fb1d2822a18b44187774db10a3 Mon Sep 17 00:00:00 2001
From: carneiro <carneiro@348d0f76-0448-11de-a6fe-93d51630548a>
Date: Tue, 1 Feb 2011 20:55:19 +0000
Subject: [PATCH] small bug fix on chromosome names.

git-svn-id: file:///humgen/gsa-scr1/gsa-engineering/svn_contents/trunk@5168 348d0f76-0448-11de-a6fe-93d51630548a
---
 lua/MergeIntervals.lua | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lua/MergeIntervals.lua b/lua/MergeIntervals.lua
index c6a9f7f34..88c06a990 100644
--- a/lua/MergeIntervals.lua
+++ b/lua/MergeIntervals.lua
@@ -13,7 +13,7 @@ assert(table.getn(arg) > 0, "\n\nMissing input file\n\nUsage:\n\tlua MergeInterv
 local intervals = {}
 local intervalKeys = {}
 for l in io.lines(arg[1]) do
-	local chr, a, b = l:match("([%l%d]+):(%d+)-(%d+)")
+	local chr, a, b = l:match("([%a%d]+):(%d+)-(%d+)")
 	a,b = tonumber(a), tonumber(b)
 	if not intervals[chr] then 
 		intervals[chr] = {}