Create Perl6 heuristic

This commit is contained in:
Rob Hoelz
2014-11-26 16:28:00 -06:00
parent 837e9a6325
commit ed3d38cf05

View File

@@ -70,8 +70,10 @@ module Linguist
end
end
disambiguate "Perl", "Prolog" do |data|
if data.include?("use strict")
disambiguate "Perl", "Perl6", "Prolog" do |data|
if data.include?("use v6")
Language["Perl6"]
elsif data.include?("use strict")
Language["Perl"]
elsif data.include?(":-")
Language["Prolog"]