[svn:parrot] r47181 - branches/tt1452_configure_debug/t/steps/auto

[jkeenan at svn.parrot.org]

Author: jkeenan
Date: Mon May 31 01:29:02 2010
New Revision: 47181
URL: https://trac.parrot.org/parrot/changeset/47181

Log:
Update test file to reflect change in handling of verbose debugging output.

Modified:
   branches/tt1452_configure_debug/t/steps/auto/readline-02.t

Modified: branches/tt1452_configure_debug/t/steps/auto/readline-02.t
==============================================================================
--- branches/tt1452_configure_debug/t/steps/auto/readline-02.t	Mon May 31 01:26:08 2010	(r47180)
+++ branches/tt1452_configure_debug/t/steps/auto/readline-02.t	Mon May 31 01:29:02 2010	(r47181)
@@ -35,10 +35,10 @@
 
 ########## _evaluate_cc_run() ##########
 
-my ($has_readline, $verbose);
+my ($has_readline);
 
-$verbose = undef;
-$has_readline = $step->_evaluate_cc_run($verbose);
+$conf->options->set(verbose => undef);
+$has_readline = $step->_evaluate_cc_run($conf);
 is($has_readline, 1, "Got expected value for has_readline");
 is($step->result(), 'yes', "Expected result was set");
 # Prepare for next test
@@ -46,9 +46,9 @@
 
 {
     my $stdout;
-    $verbose = 1;
+    $conf->options->set(verbose => 1);
     capture(
-        sub { $has_readline = $step->_evaluate_cc_run($verbose); },
+        sub { $has_readline = $step->_evaluate_cc_run($conf); },
         \$stdout,
     );
     is($has_readline, 1, "Got expected value for has_readline");
@@ -56,6 +56,7 @@
     like($stdout, qr/\(yes\)/, "Got expected verbose output");
     # Prepare for next test
     $step->set_result(undef);
+    $conf->options->set(verbose => undef);
 }
 
 ########## _handle_readline() ##########