diff options
Diffstat (limited to 'lib/Language/TECO.pm')
-rw-r--r-- | lib/Language/TECO.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/Language/TECO.pm b/lib/Language/TECO.pm index f2fea09..0f3c966 100644 --- a/lib/Language/TECO.pm +++ b/lib/Language/TECO.pm @@ -6,7 +6,8 @@ use Language::TECO::Buffer; sub new { my $class = shift; - my $object = { buffer => Language::TECO::Buffer->new }; + my $initial_buffer = shift; + my $object = { buffer => Language::TECO::Buffer->new($initial_buffer) }; bless $object, $class; $object->reset; return $object; |