diff options
| author |   Andrew Gaffney <agaffney@gentoo.org> | 2008-01-05 05:28:11 +0000 |
|---|---|---|
| committer | Andrew Gaffney <agaffney@gentoo.org> | 2008-01-05 05:28:11 +0000 |
| commit | e4c4bd5bf3d74740f713fabb86cb4e92aa23d781 (patch) | |
| tree | 582e5c5ea662ba4961e89c114a754d44e1fde7ba /client/Scire.pm | |
| parent | only import open2 from IPC::Open2 (diff) | |
| download | scire-e4c4bd5bf3d74740f713fabb86cb4e92aa23d781.tar.gz scire-e4c4bd5bf3d74740f713fabb86cb4e92aa23d781.tar.bz2 scire-e4c4bd5bf3d74740f713fabb86cb4e92aa23d781.zip | |
change set_filename() to load_jobfile()
svn path=/branches/new-fu/; revision=329
Diffstat (limited to 'client/Scire.pm')
| -rw-r--r-- | client/Scire.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/client/Scire.pm b/client/Scire.pm index 8fd5227..19c6119 100644 --- a/client/Scire.pm +++ b/client/Scire.pm @@ -7,12 +7,12 @@ sub new { my $self = {}; bless ($self, $class); if(defined $filename) { - $self->set_filename($filename); + $self->load_jobfile($filename); } return $self; } -sub set_filename { +sub load_jobfile { my $self = shift; my $filename = shift; $self->{filename} = $filename; |