From 47d794c598d5a3ed00c23d0a1d2daf634c30ab6f Mon Sep 17 00:00:00 2001
From: Nicolas Vigier <boklm@mageia.org>
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/Youri/Submit')

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