diff --git a/lib/utils.rb b/lib/utils.rb
index 677322c98d48cd9eaee20f354dd6f5949b7b78c5..82463f9ec0c8e1464db258cf73dd2c687e7916bc 100644
--- a/lib/utils.rb
+++ b/lib/utils.rb
@@ -34,6 +34,10 @@ module Utils
         :c
       when /(\.cpp|\.hpp|\.c++|\.h++|\.cc|\.hh|\.cxx|\.hxx)$/
         :cpp
+      when /(\.d|\.di)$/
+        :d
+      when /(\.hs|\.lhs)$/
+        :haskell
       when /(\.rb|\.ru|\.rake|Rakefile|\.gemspec|\.rbx|Gemfile)$/
         :ruby
       when /(\.py|\.pyw|\.sc|SConstruct|SConscript|\.tac)$/