r77573@onn: sartak | 2008-12-16 17:10:11 -0500

[p5sagit/Devel-REPL.git] / lib / Devel / REPL / Script.pm

diff --git a/lib/Devel/REPL/Script.pm b/lib/Devel/REPL/Script.pm
index aab0cc2..2265638 100644 (file)
--- a/lib/Devel/REPL/Script.pm
+++ b/lib/Devel/REPL/Script.pm
@@ -14,7 +14,10 @@ has 'rcfile' => (
 );
 
 has 'profile' => (
-  is => 'ro', isa => 'Str', required => 1, default => sub { 'Default' },
+  is       => 'ro',
+  isa      => 'Str',
+  required => 1,
+  default  => sub { $ENV{DEVEL_REPL_PROFILE} || 'Default' },
 );
 
 has '_repl' => (