From 47d794c598d5a3ed00c23d0a1d2daf634c30ab6f Mon Sep 17 00:00:00 2001 From: Nicolas Vigier Date: Tue, 4 Dec 2012 13:08:19 +0000 Subject: Remove warnings about deprecated methods --- lib/Youri/Submit/Action/Archive.pm | 2 +- lib/Youri/Submit/Action/Markrelease.pm | 2 +- lib/Youri/Submit/Action/Rpminfo.pm | 2 +- lib/Youri/Submit/Action/Send.pm | 2 +- lib/Youri/Submit/Action/Sendcache.pm | 2 +- lib/Youri/Submit/Check/ACL.pm | 2 +- lib/Youri/Submit/Check/History.pm | 2 +- lib/Youri/Submit/Check/Host.pm | 2 +- lib/Youri/Submit/Reject/Archive.pm | 2 +- lib/Youri/Submit/Reject/Clean.pm | 2 +- lib/Youri/Submit/Reject/Install.pm | 2 +- 11 files changed, 11 insertions(+), 11 deletions(-) (limited to 'lib') diff --git a/lib/Youri/Submit/Action/Archive.pm b/lib/Youri/Submit/Action/Archive.pm index 2d65fd3..e870700 100644 --- a/lib/Youri/Submit/Action/Archive.pm +++ b/lib/Youri/Submit/Action/Archive.pm @@ -43,7 +43,7 @@ sub run { foreach my $replaced_package ( $repository->get_replaced_packages($package, $target, $define) ) { - my $file = $replaced_package->get_file(); + my $file = $replaced_package->as_file(); my ($rep_section, $rep_main_section) = $file =~ m,$path/(([^/]+)/.*)/[^/]+.rpm,; # We do accept duplicate version for other submedia of the same main media section diff --git a/lib/Youri/Submit/Action/Markrelease.pm b/lib/Youri/Submit/Action/Markrelease.pm index 40643e6..7afee68 100644 --- a/lib/Youri/Submit/Action/Markrelease.pm +++ b/lib/Youri/Submit/Action/Markrelease.pm @@ -31,7 +31,7 @@ sub run { croak "Not a class method" unless ref $self; $package->is_source or return 1; - my $file = $package->get_file(); + my $file = $package->as_file(); my $srpm_name = $package->get_canonical_name; if ($repository->package_in_svn($srpm_name)) { diff --git a/lib/Youri/Submit/Action/Rpminfo.pm b/lib/Youri/Submit/Action/Rpminfo.pm index e011a28..c14bbc1 100644 --- a/lib/Youri/Submit/Action/Rpminfo.pm +++ b/lib/Youri/Submit/Action/Rpminfo.pm @@ -41,7 +41,7 @@ sub run { my ($self, $package, $repository, $target, $define) = @_; croak "Not a class method" unless ref $self; - my $file = $package->get_file(); + my $file = $package->as_file(); my $dest = $repository->get_upload_dir($package, $target, $define); print "Caching rpm information $file on $dest\n" if $self->{_verbose}; diff --git a/lib/Youri/Submit/Action/Send.pm b/lib/Youri/Submit/Action/Send.pm index 5b5a9ec..1b11bcc 100644 --- a/lib/Youri/Submit/Action/Send.pm +++ b/lib/Youri/Submit/Action/Send.pm @@ -42,7 +42,7 @@ sub run { my ($self, $package, $repository, $target, $define) = @_; croak "Not a class method" unless ref $self; - my $file = $package->get_file(); + my $file = $package->as_file(); my $dest = $repository->get_upload_dir($package, $target, $define); print "Sending file $file to $dest\n" if $self->{_verbose}; diff --git a/lib/Youri/Submit/Action/Sendcache.pm b/lib/Youri/Submit/Action/Sendcache.pm index ec988d1..1c42e4a 100644 --- a/lib/Youri/Submit/Action/Sendcache.pm +++ b/lib/Youri/Submit/Action/Sendcache.pm @@ -46,7 +46,7 @@ sub run { # only cache debug packages if option debug_pkgs is true return if ($package->is_debug() && !$self->{_debug_pkgs}); - my $file = $package->get_file(); + my $file = $package->as_file(); my $dest = $repository->get_upload_dir($package, $target, $define); $dest =~ s!$repository->{_upload_root}/$repository->{_queue}!$self->{_root}!; diff --git a/lib/Youri/Submit/Check/ACL.pm b/lib/Youri/Submit/Check/ACL.pm index 34bf48a..a9cf52f 100644 --- a/lib/Youri/Submit/Check/ACL.pm +++ b/lib/Youri/Submit/Check/ACL.pm @@ -29,7 +29,7 @@ sub _init { sub run { my ($self, $package, $repository, $target, $define) = @_; croak "Not a class method" unless ref $self; - my $file = $package->get_full_name(); + my $file = $package->as_string(); my $arch = $package->get_arch(); my $srpm = $package->get_canonical_name; my $section = $repository->_get_section($package, $target, $define); diff --git a/lib/Youri/Submit/Check/History.pm b/lib/Youri/Submit/Check/History.pm index 326f2f1..f742a36 100644 --- a/lib/Youri/Submit/Check/History.pm +++ b/lib/Youri/Submit/Check/History.pm @@ -42,7 +42,7 @@ sub run { unless ($entries{$last_revision_number}) { push( @errors, - "Last changelog entry $last_revision_number from last revision " . $last_revision->get_full_name() . " missing from current changelog" + "Last changelog entry $last_revision_number from last revision " . $last_revision->as_string() . " missing from current changelog" ); } } diff --git a/lib/Youri/Submit/Check/Host.pm b/lib/Youri/Submit/Check/Host.pm index ee880d8..2816f83 100644 --- a/lib/Youri/Submit/Check/Host.pm +++ b/lib/Youri/Submit/Check/Host.pm @@ -29,7 +29,7 @@ sub _init { sub run { my ($self, $package, $repository, $target, $define) = @_; croak "Not a class method" unless ref $self; - my $file = $package->get_file; + my $file = $package->as_file; my $arch = $package->get_arch; my $buildhost = $package->as_formated_string('%{buildhost}'); foreach my $h (keys %$host) { diff --git a/lib/Youri/Submit/Reject/Archive.pm b/lib/Youri/Submit/Reject/Archive.pm index ea98e29..0cab163 100644 --- a/lib/Youri/Submit/Reject/Archive.pm +++ b/lib/Youri/Submit/Reject/Archive.pm @@ -32,7 +32,7 @@ sub run { my ($self, $package, $errors, $repository, $target, $define) = @_; croak "Not a class method" unless ref $self; - my $file = $package->get_file(); + my $file = $package->as_file(); my $rpm = $package->get_file_name(); my $dest = $repository->get_reject_dir($package, $target, $define); diff --git a/lib/Youri/Submit/Reject/Clean.pm b/lib/Youri/Submit/Reject/Clean.pm index af0ff1e..e1f4bc6 100644 --- a/lib/Youri/Submit/Reject/Clean.pm +++ b/lib/Youri/Submit/Reject/Clean.pm @@ -20,7 +20,7 @@ sub run { my ($self, $package, $errors, $repository, $target, $define) = @_; croak "Not a class method" unless ref $self; - my $file = $package->get_file(); + my $file = $package->as_file(); print "deleting file $file\n" if $self->{_verbose}; unlink $file unless $self->{_test}; } diff --git a/lib/Youri/Submit/Reject/Install.pm b/lib/Youri/Submit/Reject/Install.pm index b56db95..45245a4 100644 --- a/lib/Youri/Submit/Reject/Install.pm +++ b/lib/Youri/Submit/Reject/Install.pm @@ -31,7 +31,7 @@ sub run { my ($self, $package, $errors, $repository, $target, $define) = @_; croak "Not a class method" unless ref $self; - my $file = $package->get_file(); + my $file = $package->as_file(); my $rpm = $package->get_file_name(); my $dest = $repository->get_reject_path($package, $target, $define); -- cgit v1.2.1