[Bps-public-commit] Carp-REPL branch, master, updated. f83d1012b40438dab98dd5fcebb9c706d4dbdca6
Shawn Moore
sartak at bestpractical.com
Mon Apr 5 15:23:07 EDT 2010
The branch, master has been updated
via f83d1012b40438dab98dd5fcebb9c706d4dbdca6 (commit)
via 2076ad4e184331526b4a7ae92126cd55c5f45712 (commit)
via d32b81ec993d5017a617a951b78d00e74587b3b9 (commit)
from 64a5e9f3898aa156ba7e54da4e0c1cdff1f13ef8 (commit)
Summary of changes:
Makefile.PL | 1 +
t/00-load.t | 9 +++++++--
t/01-trivial.t | 2 +-
t/02-lexicals.t | 2 +-
t/03-subs.t | 2 +-
t/04-scope.t | 2 +-
t/05-interact.t | 2 +-
t/06-remember.t | 2 +-
t/07-frame.t | 2 +-
t/08-alias.t | 2 +-
t/09-args.t | 2 +-
t/11-warn.t | 2 +-
t/12-env.t | 2 +-
t/13-list.t | 2 +-
t/99-bug.t | 2 +-
15 files changed, 21 insertions(+), 15 deletions(-)
- Log -----------------------------------------------------------------
commit d32b81ec993d5017a617a951b78d00e74587b3b9
Author: Josh ben Jore <jjore at cpan.org>
Date: Sun Apr 4 16:15:58 2010 -0700
Add shebang to Makefile.PL
diff --git a/Makefile.PL b/Makefile.PL
index 0cbf580..5845cf0 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -1,3 +1,4 @@
+#!perl
use inc::Module::Install;
name 'Carp-REPL';
commit 2076ad4e184331526b4a7ae92126cd55c5f45712
Author: Josh ben Jore <jjore at cpan.org>
Date: Sun Apr 4 16:16:20 2010 -0700
Use $^X, not "perl" in tests
diff --git a/t/01-trivial.t b/t/01-trivial.t
index 8a4929f..19308d3 100644
--- a/t/01-trivial.t
+++ b/t/01-trivial.t
@@ -8,7 +8,7 @@ use Test::Expect;
expect_run
(
- command => 'perl -Ilib -MCarp::REPL=noprofile t/scripts/01-trivial.pl',
+ command => "$^X -Ilib -MCarp::REPL=noprofile t/scripts/01-trivial.pl",
prompt => '$ ',
quit => 'exit',
);
diff --git a/t/02-lexicals.t b/t/02-lexicals.t
index 0ae7f30..43f6535 100644
--- a/t/02-lexicals.t
+++ b/t/02-lexicals.t
@@ -6,7 +6,7 @@ use Test::Expect;
expect_run
(
- command => 'perl -Ilib -MCarp::REPL=noprofile t/scripts/02-lexicals.pl',
+ command => "$^X -Ilib -MCarp::REPL=noprofile t/scripts/02-lexicals.pl",
prompt => '$ ',
quit => 'exit',
);
diff --git a/t/03-subs.t b/t/03-subs.t
index 65b2ed9..9750068 100644
--- a/t/03-subs.t
+++ b/t/03-subs.t
@@ -6,7 +6,7 @@ use Test::Expect;
expect_run
(
- command => 'perl -Ilib -MCarp::REPL=noprofile t/scripts/03-subs.pl',
+ command => "$^X -Ilib -MCarp::REPL=noprofile t/scripts/03-subs.pl",
prompt => '$ ',
quit => 'exit',
);
diff --git a/t/04-scope.t b/t/04-scope.t
index 92fd21f..030f6e1 100644
--- a/t/04-scope.t
+++ b/t/04-scope.t
@@ -6,7 +6,7 @@ use Test::Expect;
expect_run
(
- command => 'perl -Ilib -MCarp::REPL=noprofile t/scripts/04-scope.pl',
+ command => "$^X -Ilib -MCarp::REPL=noprofile t/scripts/04-scope.pl",
prompt => '$ ',
quit => 'exit',
);
diff --git a/t/05-interact.t b/t/05-interact.t
index 8b18978..5930880 100644
--- a/t/05-interact.t
+++ b/t/05-interact.t
@@ -6,7 +6,7 @@ use Test::Expect;
expect_run
(
- command => 'perl -Ilib -MCarp::REPL=noprofile t/scripts/05-interact.pl',
+ command => "$^X -Ilib -MCarp::REPL=noprofile t/scripts/05-interact.pl",
prompt => '$ ',
quit => 'exit',
);
diff --git a/t/06-remember.t b/t/06-remember.t
index 5ee0958..62a8ed0 100644
--- a/t/06-remember.t
+++ b/t/06-remember.t
@@ -8,7 +8,7 @@ use Test::Expect;
expect_run
(
- command => 'perl -Ilib -MCarp::REPL=noprofile t/scripts/01-trivial.pl',
+ command => "$^X -Ilib -MCarp::REPL=noprofile t/scripts/01-trivial.pl",
prompt => '$ ',
quit => 'exit',
);
diff --git a/t/07-frame.t b/t/07-frame.t
index c2c1dc2..73c607f 100644
--- a/t/07-frame.t
+++ b/t/07-frame.t
@@ -6,7 +6,7 @@ use Test::Expect;
expect_run
(
- command => 'perl -Ilib -MCarp::REPL=noprofile t/scripts/07-frame.pl',
+ command => "$^X -Ilib -MCarp::REPL=noprofile t/scripts/07-frame.pl",
prompt => '$ ',
quit => 'exit',
);
diff --git a/t/08-alias.t b/t/08-alias.t
index 3260033..afd68fb 100644
--- a/t/08-alias.t
+++ b/t/08-alias.t
@@ -8,7 +8,7 @@ use Test::Expect;
expect_run
(
- command => 'perl -Ilib t/scripts/08-alias.pl',
+ command => "$^X -Ilib t/scripts/08-alias.pl",
prompt => '$ ',
quit => 'exit',
);
diff --git a/t/09-args.t b/t/09-args.t
index 8e35d69..463aaba 100644
--- a/t/09-args.t
+++ b/t/09-args.t
@@ -6,7 +6,7 @@ use Test::Expect;
expect_run
(
- command => 'perl -Ilib -MCarp::REPL=noprofile t/scripts/09-args.pl',
+ command => "$^X -Ilib -MCarp::REPL=noprofile t/scripts/09-args.pl",
prompt => '$ ',
quit => 'exit',
);
diff --git a/t/11-warn.t b/t/11-warn.t
index 603b56d..f840778 100644
--- a/t/11-warn.t
+++ b/t/11-warn.t
@@ -6,7 +6,7 @@ use Test::Expect;
expect_run
(
- command => 'perl -Ilib t/scripts/11-warn.pl',
+ command => "$^X -Ilib t/scripts/11-warn.pl",
prompt => '$ ',
quit => 'exit',
);
diff --git a/t/12-env.t b/t/12-env.t
index 55354da..409f122 100644
--- a/t/12-env.t
+++ b/t/12-env.t
@@ -6,7 +6,7 @@ use Test::Expect;
expect_run
(
- command => 'perl -Ilib -MCarp::REPL=noprofile t/scripts/12-env.pl',
+ command => "$^X -Ilib -MCarp::REPL=noprofile t/scripts/12-env.pl",
prompt => '$ ',
quit => 'exit',
);
diff --git a/t/13-list.t b/t/13-list.t
index cc191a9..494f230 100644
--- a/t/13-list.t
+++ b/t/13-list.t
@@ -6,7 +6,7 @@ use Test::Expect;
expect_run
(
- command => 'perl -Ilib -MCarp::REPL=noprofile t/scripts/12-env.pl',
+ command => "$^X -Ilib -MCarp::REPL=noprofile t/scripts/12-env.pl",
prompt => '$ ',
quit => 'exit',
);
diff --git a/t/99-bug.t b/t/99-bug.t
index 20983b1..135fb0f 100644
--- a/t/99-bug.t
+++ b/t/99-bug.t
@@ -6,7 +6,7 @@ use Test::Expect;
expect_run
(
- command => 'perl -Ilib -MCarp::REPL=noprofile t/scripts/07-frame.pl',
+ command => "$^X -Ilib -MCarp::REPL=noprofile t/scripts/07-frame.pl",
prompt => '$ ',
quit => 'exit',
);
commit f83d1012b40438dab98dd5fcebb9c706d4dbdca6
Author: Shawn M Moore <sartak at gmail.com>
Date: Mon Apr 5 15:23:11 2010 -0400
More version diags
diff --git a/t/00-load.t b/t/00-load.t
index cdf0420..378d4d8 100644
--- a/t/00-load.t
+++ b/t/00-load.t
@@ -1,10 +1,15 @@
#!perl -T
-use Test::More tests => 2;
+use Test::More tests => 3;
BEGIN {
+ use_ok( 'Devel::REPL' );
use_ok( 'Carp::REPL' );
use_ok( 'Devel::REPL::Plugin::Carp::REPL' );
}
-diag( "Testing Carp::REPL $Carp::REPL::VERSION, Perl $], $^X" );
+
+diag("Carp::REPL $Carp::REPL::VERSION");
+diag("Devel::REPL $Devel::REPL::VERSION");
+diag("Perl $], $^X");
+
-----------------------------------------------------------------------
More information about the Bps-public-commit
mailing list