diff options
| -rwxr-xr-x | rpmdrake | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -121,8 +121,9 @@ sub extract_header { $p->update_header($headersdir . $p->header_filename) or log::l("Warning, could not extract header!"), goto header_non_available; rm_rf($headersdir); add2hash($pkg, { summary => $p->summary, description => beautify_description($p->description) }); + my $localtime2changelog = sub { scalar(localtime($_[0])) =~ /(.*) \S+ (\d{4})$/; "$1 $2" }; @$max_info_in_descr and add2hash($pkg, { files => join("\n", $p->files), - changelog => join("\n", mapn { "* ".scalar(localtime($_[2]))." $_[0]\n\n$_[1]\n" } + changelog => join("\n", mapn { "* ".$localtime2changelog->($_[2])." $_[0]\n\n$_[1]\n" } [ $p->changelog_name ], [ $p->changelog_text ], [ $p->changelog_time ]) }); $p->pack_header; } else { |