This commit is contained in:
joey
2000-04-21 07:33:12 +00:00
parent 5bb771334d
commit bfacf70e1f

View File

@@ -43,13 +43,13 @@ sub install {
die "Unable to install: $!"; die "Unable to install: $!";
} }
=item read_file =item scan
Implement the read_file method to read a rpm file. Implement the scan method to read a rpm file.
=cut =cut
sub read_file { sub scan {
my $this=shift; my $this=shift;
$this->SUPER::read_file(@_); $this->SUPER::read_file(@_);
my $file=$this->filename; my $file=$this->filename;