Add 'text' language with samples, and heuristics for .fr.

lib/linguist/heuristics.rb

@@ -156,5 +156,14 @@ module Linguist
       end
     end
 
+    disambiguate "Frege", "Forth", "text" do |data|
+      if /^(: |also |new-device|previous )/.match(data)
+        Language["Forth"]
+      elsif /\s*(import|module|package|data|type) /.match(data)
+        Language["Frege"]
+      else
+        Language["text"]
+      end
+    end
   end
 end

lib/linguist/languages.yml

@@ -3232,6 +3232,15 @@ reStructuredText:
   - .rest
   ace_mode: none
 
+text:
+  type: prose
+  wrap: true
+  extensions:
+  - .txt
+  - .fr
+  tm_scope: none
+  ace_mode: none
+
 wisp:
   type: programming
   ace_mode: clojure