File Coverage

blib/lib/Goo/Editor.pm

Criterion	Covered	Total	%
statement	15	20	75.0
branch	0	2	0.0
condition			n/a
subroutine	5	6	83.3
pod	1	1	100.0
total	21	29	72.4

package Goo::Editor;

###############################################################################
# Nigel Hamilton
#
# Copyright Nigel Hamilton 2005
# All Rights Reserved
#
# Author:       Nigel Hamilton
# Filename:     Goo::Editor.pm
# Description:  Edit a program interactively as fast as possible
#
# Date          Change
# -----------------------------------------------------------------------------
# 23/06/2005    Version 1
# 01/08/2005    Simplified due to new architecture
#
###############################################################################

use strict;

use Goo::Object;
use Goo::TextEditor;
use Goo::ThereDocManager;

use base qw(Goo::Object);


###############################################################################
#
# run - execute
#
###############################################################################

sub run {

    my ($this, $thing, $line_number) = @_;

    # sometimes we need to make an intelligent jump
    # maybe this will be handled by the JumpManager
    # in the future - in the shortterm this provides
    # some magic
    # need to provide a line number here
    # so we can jump directly
    Goo::TextEditor::edit($thing->get_full_path(), $line_number);

    # analyse for ThereDocs > > >
    my ($theredoc_line_number, $target_thing, $target_action, $target_line_number) =
        Goo::ThereDocManager->new()->process($thing->get_full_path());

    if ($target_thing) {
        $target_thing->do_action($target_action, $target_line_number);
    }

}

1;


__END__

=head1 NAME

Goo::Editor - Call an external editor like vi or nano to edit a file.

=head1 SYNOPSIS

use Goo::Editor;

=head1 DESCRIPTION

Wrap an external editor like vi or nano.

Editor is a top level action handler.

=head1 METHODS

=over

=item run

edit the file

=back

=head1 AUTHOR

Nigel Hamilton <[e-mail]>

=head1 SEE ALSO