From c6928bd6750127ae4533948f7979aab5de993e1a Mon Sep 17 00:00:00 2001
From: Dmitry Dzhus <dima@dzhus.org>
Date: Thu, 4 Dec 2014 18:15:09 +0300
Subject: [PATCH] Recognize Haskell (.hs) comments (Fixes issue 49).

Signed-off-by: Adam Waldenberg <adam.waldenberg@ejwa.se>
---
 gitinspector/comment.py | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/gitinspector/comment.py b/gitinspector/comment.py
index ad54bb4..24577a3 100644
--- a/gitinspector/comment.py
+++ b/gitinspector/comment.py
@@ -19,15 +19,15 @@
 
 from __future__ import unicode_literals
 
-__comment_begining__ = {"java": "/*", "c": "/*", "cc": "/*", "cpp": "/*", "h": "/*", "hh": "/*", "hpp": "/*", "html": "<!--",
+__comment_begining__ = {"java": "/*", "c": "/*", "cc": "/*", "cpp": "/*", "h": "/*", "hh": "/*", "hpp": "/*", "hs": "{-", "html": "<!--",
                         "php": "/*", "py": "\"\"\"", "glsl": "/*", "rb": "=begin", "js": "/*", "jspx": "<!--", "scala": "/*",
                         "sql": "/*", "tex": "\\begin{comment}", "xhtml": "<!--", "xml": "<!--", "ml": "(*", "mli": "(*" }
 
-__comment_end__ = {"java": "*/", "c": "*/", "cc": "*/", "cpp": "*/", "h": "*/", "hh": "*/", "hpp": "*/", "html": "-->",
+__comment_end__ = {"java": "*/", "c": "*/", "cc": "*/", "cpp": "*/", "h": "*/", "hh": "*/", "hpp": "*/", "hs": "-}", "html": "-->",
                    "php": "/*", "py": "\"\"\"", "glsl": "*/", "rb": "=end", "js": "*/", "jspx": "-->", "scala": "*/",
                    "sql": "*/", "tex": "\\end{comment}", "xhtml": "-->", "xml": "-->", "ml": "*)", "mli": "*)" }
 
-__comment__ = {"java": "//", "c": "//", "cc": "//", "cpp": "//", "h": "//", "hh": "//", "hpp": "//", "pl": "#", "php": "//",
+__comment__ = {"java": "//", "c": "//", "cc": "//", "cpp": "//", "h": "//", "hh": "//", "hpp": "//", "hs": "--", "pl": "#", "php": "//",
                "py": "#", "glsl": "//", "rb": "#", "js": "//", "scala": "//", "sql": "--", "tex": "%", "ada": "--", "ads": "--",
                "adb": "--", "pot": "#", "po": "#" }