diff options
Diffstat (limited to 'modules/rpmdragora/rpmdragora')
-rwxr-xr-x | modules/rpmdragora/rpmdragora | 17 |
1 files changed, 12 insertions, 5 deletions
diff --git a/modules/rpmdragora/rpmdragora b/modules/rpmdragora/rpmdragora index ccb53f4..51f2b55 100755 --- a/modules/rpmdragora/rpmdragora +++ b/modules/rpmdragora/rpmdragora @@ -199,20 +199,27 @@ sub detaillist_changeditem_callback { sub detaillist_callback { my ($selection, $info, $options) = @_; + $info->setValue(""); - $info->setValue("<h2>" . $loc->N("Informations") . "</h2>"); return if( ref $selection ne "yui::YItem"); + + my $info_text ="<h2>" . $loc->N("Informations") . "</h2>"; + my @data = get_info($options->{table_item_list}[$selection->index()],$info->parent()->parent()); for(@{$data[0]}){ if(ref $_ ne "ARRAY"){ - $info->setValue($info->value()."<br />$_"); + $info_text .= "<br />" . $_; }else{ - $info->setValue($info->value()."<br />"); - for my $subitem(@{$_}){ - $info->setValue($info->value()."<br /> ".$subitem); + $info_text .= "<br />"; + for my $subitem(@{$_}) { + $info_text .= "<br />" . "<br /> " . $subitem; } } } + # change \n to <br/> + $info_text =~ s|\n|<br/>|g; + + $info->setValue($info_text); } sub do_search($$$$$$$) { |