Implement -n and -t for filtering on context/specification names

darcs-hash:20071205004933-4fc50-bf25adcb3aa94bded121b452ad17a15a1c38c1f5.gz

1 files changed, 3 insertions, 2 deletions

diff --git a/bin/bacon b/bin/bacon
index 60997d8..dd01064 100755
--- a/bin/bacon
+++ b/bin/bacon
@@ -2,6 +2,7 @@
 # -*- ruby -*-
 
 require 'optparse'
+module Bacon; end
 
 automatic = false
 output = 'SpecDoxOutput'
@@ -56,12 +57,12 @@ opts = OptionParser.new("", 24, '  ') { |opts|
 
   opts.on('-n', '--name NAME', String,
           "runs tests matching regexp NAME") { |n|
-    # TODO
+    Bacon.const_set :RestrictName, Regexp.new(n)
   }
   
   opts.on('-t', '--testcase TESTCASE', String,
           "runs tests in TestCases matching regexp TESTCASE") { |t|
-    # TODO
+    Bacon.const_set :RestrictContext, Regexp.new(t)
   }
 
   opts.separator ""