add a section per package for the final upload procedure where youri should not try to guess the section

1 files changed, 7 insertions, 0 deletions

diff --git a/lib/Youri/Package.pm b/lib/Youri/Package.pm
index 310961d..6218d6e 100644
--- a/lib/Youri/Package.pm
+++ b/lib/Youri/Package.pm
@@ -41,10 +41,12 @@ sub new {
     croak "Abstract class" if $class eq __PACKAGE__;
 
     my %options = (
+	section => '',
         @_
     );
 
     my $self = bless {
+	_section => $options{section}
     }, $class;
 
     $self->_init(%options);
@@ -56,6 +58,11 @@ sub _init {
     # do nothing
 }
 
+sub _get_section {
+    my ($self) = @_;
+    $self->{_section}
+}
+
 =head2 get_pattern($name, $version, $release, $arch)
 
 Returns a pattern matching a file for a package, using available informations.