diff options
| author | Olivier Blin <blino@mageia.org> | 2011-04-04 22:59:01 +0000 |
|---|---|---|
| committer | Olivier Blin <blino@mageia.org> | 2011-04-04 22:59:01 +0000 |
| commit | 699c5e78d5512a2779ce834882cfdda895db32b1 (patch) | |
| tree | 0e1d060beb87008d7e266d6fbafb071c8bce10e9 /lib/Youri/Submit/Action/Mail.pm | |
| parent | b06110139b89597dbe34d33b907538c93991bfe4 (diff) | |
| parent | 51d5d4e7a0d1d1cca9a5214782575b5f8aa7aa8b (diff) | |
| download | mga-youri-submit-699c5e78d5512a2779ce834882cfdda895db32b1.tar mga-youri-submit-699c5e78d5512a2779ce834882cfdda895db32b1.tar.gz mga-youri-submit-699c5e78d5512a2779ce834882cfdda895db32b1.tar.bz2 mga-youri-submit-699c5e78d5512a2779ce834882cfdda895db32b1.tar.xz mga-youri-submit-699c5e78d5512a2779ce834882cfdda895db32b1.zip | |
rename mdv-youri-submit as mga-youri-submit
Diffstat (limited to 'lib/Youri/Submit/Action/Mail.pm')
| -rw-r--r-- | lib/Youri/Submit/Action/Mail.pm | 17 |
1 files changed, 14 insertions, 3 deletions
diff --git a/lib/Youri/Submit/Action/Mail.pm b/lib/Youri/Submit/Action/Mail.pm index c9bbcbe..02e36cd 100644 --- a/lib/Youri/Submit/Action/Mail.pm +++ b/lib/Youri/Submit/Action/Mail.pm @@ -110,13 +110,24 @@ sub get_content { my ($self, $package, $repository, $target, $define) = @_; croak "Not a class method" unless ref $self; - my $information = $package->get_information(); + my $information = $package->as_formated_string(<<EOF); +Name : %-27{NAME} Relocations: %|PREFIXES?{[%{PREFIXES} ]}:{(not relocatable)}| +Version : %-27{VERSION} Vendor: %{VENDOR} +Release : %-27{RELEASE} Build Date: %{BUILDTIME:date} +Install Date: %|INSTALLTIME?{%-27{INSTALLTIME:date}}:{(not installed) }| Build Host: %{BUILDHOST} +Group : %-27{GROUP} Source RPM: %{SOURCERPM} +Size : %-27{SIZE}%|LICENSE?{ License: %{LICENSE}}| +Signature : %|DSAHEADER?{%{DSAHEADER:pgpsig}}:{%|RSAHEADER?{%{RSAHEADER:pgpsig}}:{%|SIGGPG?{%{SIGGPG:pgpsig}}:{%|SIGPGP?{%{SIGPGP:pgpsig}}:{(none)}|}|}|}| +%|PACKAGER?{Packager : %{PACKAGER}\n}|%|URL?{URL : %{URL}\n}|Summary : %{SUMMARY} +Description :\n%{DESCRIPTION} +EOF + my $last_change = $package->get_last_change(); return $information . "\n" . - $last_change->[Youri::Package::CHANGE_AUTHOR] . ":\n" . - $last_change->[Youri::Package::CHANGE_TEXT]; + $last_change->get_author() . ":\n" . + $last_change->get_raw_text(); } |