| CC: | Caleb Cushing <xenoterracide [...] gmail.com> |
| Subject: | [PATCH 2/4] create a new default profile |
| Date: | Fri, 6 Aug 2010 04:09:36 -0400 |
| To: | bug-devel-repl [...] rt.cpan.org |
| From: | Caleb Cushing <xenoterracide [...] gmail.com> |
This default uses more plugins and should be more friendly
Signed-off-by: Caleb Cushing <xenoterracide@gmail.com>
---
lib/Devel/REPL/Profile/Default.pm | 29 +++++++++++++++++++++++++++++
1 files changed, 29 insertions(+), 0 deletions(-)
create mode 100644 lib/Devel/REPL/Profile/Default.pm
diff --git a/lib/Devel/REPL/Profile/Default.pm b/lib/Devel/REPL/Profile/Default.pm
new file mode 100644
index 0000000..8bfa69d
--- /dev/null
+++ b/lib/Devel/REPL/Profile/Default.pm
@@ -0,0 +1,29 @@
+package Devel::REPL::Profile::Default;
+
+use Moose;
+use namespace::clean -except => [ 'meta' ];
+
+with 'Devel::REPL::Profile';
+
+sub plugins { qw(
+ Colors
+ Completion
+ CompletionDriver::INC
+ CompletionDriver::LexEnv
+ CompletionDriver::Keywords
+ CompletionDriver::Methods
+ History
+ LexEnv
+ DDS
+ Packages
+ Commands
+ MultiLine::PPI
+ ReadLineHistory
+);}
+
+sub apply_profile {
+ my ($self, $repl) = @_;
+ $repl->load_plugin($_) for $self->plugins;
+}
+
+1;
--
1.7.2.1