diff options
author | Mandrake <mandrake@mandriva.com> | 2006-09-12 11:03:25 +0000 |
---|---|---|
committer | Mandrake <mandrake@mandriva.com> | 2006-09-12 11:03:25 +0000 |
commit | b60cd5db35074f9137a149cd64632b180aa5ea0e (patch) | |
tree | b24ac338385e5d8452a3be0be84a467df6c87b81 /lib/Youri/Package | |
parent | 862faaf416eb543c96514be8ff161e25bf51391d (diff) | |
download | mga-youri-core-b60cd5db35074f9137a149cd64632b180aa5ea0e.tar mga-youri-core-b60cd5db35074f9137a149cd64632b180aa5ea0e.tar.gz mga-youri-core-b60cd5db35074f9137a149cd64632b180aa5ea0e.tar.bz2 mga-youri-core-b60cd5db35074f9137a149cd64632b180aa5ea0e.tar.xz mga-youri-core-b60cd5db35074f9137a149cd64632b180aa5ea0e.zip |
add get_full_version including epoch, used for obsolete search
Diffstat (limited to 'lib/Youri/Package')
-rw-r--r-- | lib/Youri/Package/URPM.pm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/lib/Youri/Package/URPM.pm b/lib/Youri/Package/URPM.pm index 2dcc317..3cd8aa4 100644 --- a/lib/Youri/Package/URPM.pm +++ b/lib/Youri/Package/URPM.pm @@ -110,6 +110,13 @@ sub get_version { return $self->{_header}->version(); } +sub get_full_version { + my ($self) = @_; + croak "Not a class method" unless ref $self; + + return $self->{_header}->epoch() ."-" . $self->{_header}->version() . "-". $self->{_header}->release() +} + sub get_release { my ($self) = @_; croak "Not a class method" unless ref $self; |