switch to reply

3 files changed, 18 insertions, 83 deletions

diff --git a/Makefile b/Makefile
index bd612ac..b489646 100644
--- a/Makefile
+++ b/Makefile
@@ -22,6 +22,7 @@ INSTALL   = abcde.conf \
 	    procmailrc \
 	    proverc \
 	    pwsafe.dat \
+	    replyrc \
 	    screenrc \
 	    tmux.conf \
 	    vimrc \
@@ -41,7 +42,6 @@ INSTALL   = abcde.conf \
 	    ncmpc \
 	    procmail \
 	    pentadactyl \
-	    re.pl \
 	    services \
 	    ssh \
 	    taeb \
diff --git a/re.pl/repl.rc b/re.pl/repl.rc
deleted file mode 100644
index bed8edb..0000000
--- a/re.pl/repl.rc
+++ /dev/null
@@ -1,82 +0,0 @@
-# set up Devel::REPL
-{
-    use Term::ANSIColor;
-
-    my @plugins = (
-        'ClassRefresh',               # refresh before every eval
-        'Colors',                     # colorize return value and errors
-        'Editor',                     # #e to edit code in vim
-        'FancyPrompt',                # provide an irb-like prompt
-        'Interrupt',                  # improve handling of ^C
-        'LoadClass',                  # automatically load unloaded classes
-        'MultiLine::PPI',             # allow multiple lines
-        'Nopaste',                    # paste session with #nopaste
-        'OutputCache',                # access previous results
-        'Peek',                       # Devel::Peek support
-        'ReadLineHistory',            # history saved across sessions
-        'Time',                       # time specific commands
-
-        'Completion',
-        'CompletionDriver::Globals',  # global variables
-        'CompletionDriver::INC',      # loading new modules
-        'CompletionDriver::Keywords', # substr, while, etc
-        'CompletionDriver::LexEnv',   # current environment
-        'CompletionDriver::Methods',  # class method completion
-        'CompletionDriver::Turtles',  # turtle command completion
-    );
-
-    $_REPL->load_plugin($_) for @plugins;
-
-    $_REPL->fancy_prompt(sub {
-        my $self = shift;
-        "\ca" . color('blue')  . "\cb" . $self->current_package
-    . "\ca" . color('green') . "\cb" . '(0)'
-    . "\ca" . color('reset') . "\cb" . '> '
-    } );
-    $_REPL->fancy_continuation_prompt(sub {
-        my $self = shift;
-        "\ca" . color('blue')   . "\cb" . $self->current_package
-    . "\ca" . color('yellow') . "\cb" . '(' . $self->line_depth . ')'
-    . "\ca" . color('reset')  . "\cb" . '> ' . (' ' x ($self->line_depth * 2))
-    });
-
-    $Devel::REPL::Plugin::Packages::PKG_SAVE = 'main';
-}
-
-# set up the default environment
-{
-    package main;
-
-    use List::Util qw(first max maxstr min minstr reduce shuffle sum);
-    use List::MoreUtils ':all';
-    use Scalar::Util qw(blessed weaken isweak);
-    use Path::Class;
-}
-
-# load a local config file if it exists
-{
-    use Cwd ();
-    my $cd = Path::Class::dir(Cwd::getcwd)->absolute->cleanup;
-    my $home = Path::Class::dir(File::HomeDir->my_home)->absolute->cleanup;
-    if ($home->subsumes($cd)) {
-        while ($cd ne $home) {
-            my $proj = $cd->file('.repl.rc');
-            if (-f $proj) {
-                $Devel::REPL::Script::CURRENT_SCRIPT->apply_script(
-                    $proj->stringify,
-                    0,
-                );
-                last;
-            }
-            $cd = $cd->parent;
-        }
-    }
-}
-
-# stuff that needs to be lexical
-use 5.010; # would be nice if it was possible to do this conditionally
-
-# do this last (and at runtime) so the previous stuff doesn't see it
-unshift @INC, 'lib';
-
-# vim:filetype=perl:
diff --git a/replyrc b/replyrc
new file mode 100644
index 0000000..fc87f60
--- /dev/null
+++ b/replyrc
@@ -0,0 +1,17 @@
+script_line1 = use strict
+script_line2 = use warnings
+script_line3 = use 5.018000
+script_line4 = use lib 'lib'
+
+[Nopaste]
+[Interrupt]
+[FancyPrompt]
+[DataDump]
+[Colors]
+[ReadLine]
+[Hints]
+[Packages]
+[LexicalPersistence]
+[LoadClass]
+[Editor]
+[ResultCache]