diff options
Diffstat (limited to 'lib/Reply/Plugin/Editor.pm')
-rw-r--r-- | lib/Reply/Plugin/Editor.pm | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/lib/Reply/Plugin/Editor.pm b/lib/Reply/Plugin/Editor.pm index 76184d1..fe5c23e 100644 --- a/lib/Reply/Plugin/Editor.pm +++ b/lib/Reply/Plugin/Editor.pm @@ -10,9 +10,14 @@ use Proc::InvokeEditor; sub new { my $class = shift; + my %opts = @_; my $self = $class->SUPER::new(@_); - $self->{editor} = Proc::InvokeEditor->new; + $self->{editor} = Proc::InvokeEditor->new( + (defined $opts{editor} + ? (editors => [ $opts{editor} ]) + : ()) + ); $self->{current_text} = ''; return $self; |