Fixed mime test.

Adding FSharp to SLOC counter.
kathackeray · Jan 26, 2015 · 40b3453 · 40b3453
1 parent 444c545
commit 40b3453
Show file tree

Hide file tree

Showing 3 changed files with 4 additions and 2 deletions.
diff --git a/lib/Padre/Comment.pm b/lib/Padre/Comment.pm
@@ -277,6 +277,7 @@ Padre::Comment->register(
 	'text/x-eiffel'             => '--',
 	'text/x-forth'              => '\\',
 	'text/x-fortran'            => '!',
+	'text/x-fsharp'             => '//',
 	'text/x-haskell'            => '--',
 	'application/x-latex'       => '%',
 	'application/x-lisp'        => ';',

diff --git a/lib/Padre/SLOC.pm b/lib/Padre/SLOC.pm
@@ -1,6 +1,6 @@
 package Padre::SLOC;
 
-# A basic Source Lines of Code counter/accumulator
+# A basic "Source Lines of Code" counter/accumulator
 
 use 5.008;
 use strict;
@@ -24,6 +24,7 @@ my %CONTENT = (
 	'text/x-adasrc'          => 'code',
 	'text/x-cobol'           => 'code',
 	'text/x-csrc'            => 'code',
+	'text/x-fsharp'          => 'code',
 	'text/x-haskell'         => 'code',
 	'text/x-java'            => 'code',
 	'text/x-pascal'          => 'code',

diff --git a/t/12_mime.t b/t/12_mime.t
@@ -4,7 +4,7 @@
 
 use strict;
 use warnings;
-use Test::More tests => 759;
+use Test::More tests => 773;
 use Test::NoWarnings;
 use File::Spec::Functions;
 use t::lib::Padre;