WebSVN – wimsdev – Diff – /trunk/wims/public_html/bases/sys/taxonomy/taxo.pl



  $T .= '<ul id="tree_'.$taxo.'" class="tree">';
  if (!@list) { @list=sort keys %{$desc} };
  for my $a (@list) { $T .= one($a, $taxo, $desc, $tit, $ref, $vu); };
  $T .= "</ul>";
  if (!$module) {
    $T .= "<input type=\"checkbox\" name=\"taxon_$taxo\" id=\"empty\" value=\"\"> $joker";
  }
  $T .= "<div class=\"wims_credits\">";
  $T .= " <strong>\$wims_name_credits:</strong> <a href=\"$desctaxo\" target=\"_blank\">$desctaxo</a>";
  $T .= "</div>";
  $T .= "<!-- Reload dynamic tree display -->";

  my $T = '<li class="closed">';
  if (!$tit->{$a}) { print "warning $a has no title" ; $tit->{$a}=$a};
  if (!$ref->{'total'}{$a}) { $ref->{'total'}{$a}=0 } ;
  if (!$ref->{'totalexo'}{$a}) { $ref->{'totalexo'}{$a}=0 } ;
  if (!$module) {
    $T .= "<input type=\"checkbox\" name=\"taxon_$taxo\" id=\"$amod\" value=\"$amod\">"
          . "<label for=\"$amod\">$tit->{$a}</label><span class=\"small hidden\">($a)</span>";
  } else {
    $T .= "<span class=\"tree_icon\" id=\"$amod\">$tit->{$a}</span><span class=\"small hidden\">($a)</span> ";
    if ($ref->{'total'}{$a} >0){
      $T .= "<sup class=\"pastille taxo_nb_modules\">".$ref->{'total'}{$a}." \$name_M</sup>";

Subversion Repositories wimsdev

(root)/trunk/wims/public_html/bases/sys/taxonomy/taxo.pl – Rev 17179 → 17905

Rev 17179		Rev 17905
Line 139...		Line 139...
139	$T .= '<ul id="tree_'.$taxo.'" class="tree">';	139	$T .= '<ul id="tree_'.$taxo.'" class="tree">';
140	if (!@list) { @list=sort keys %{$desc} };	140	if (!@list) { @list=sort keys %{$desc} };
141	for my $a (@list) { $T .= one($a, $taxo, $desc, $tit, $ref, $vu); };	141	for my $a (@list) { $T .= one($a, $taxo, $desc, $tit, $ref, $vu); };
142	$T .= "</ul>";	142	$T .= "</ul>";
143	if (!$module) {	143	if (!$module) {
144	$T .= "<input type=\"~~radio~~\" name=\"taxon_$taxo\" id=\"empty\" value=\"\"> $joker";	144	$T .= "<input type=\"checkbox\" name=\"taxon_$taxo\" id=\"empty\" value=\"\"> $joker";
145	}	145	}
146	$T .= "<div class=\"wims_credits\">";	146	$T .= "<div class=\"wims_credits\">";
147	$T .= " <strong>\$wims_name_credits:</strong> <a href=\"$desctaxo\" target=\"_blank\">$desctaxo</a>";	147	$T .= " <strong>\$wims_name_credits:</strong> <a href=\"$desctaxo\" target=\"_blank\">$desctaxo</a>";
148	$T .= "</div>";	148	$T .= "</div>";
149	$T .= "<!-- Reload dynamic tree display -->";	149	$T .= "<!-- Reload dynamic tree display -->";
Line 163...		Line 163...
163	my $T = '<li class="closed">';	163	my $T = '<li class="closed">';
164	if (!$tit->{$a}) { print "warning $a has no title" ; $tit->{$a}=$a};	164	if (!$tit->{$a}) { print "warning $a has no title" ; $tit->{$a}=$a};
165	if (!$ref->{'total'}{$a}) { $ref->{'total'}{$a}=0 } ;	165	if (!$ref->{'total'}{$a}) { $ref->{'total'}{$a}=0 } ;
166	if (!$ref->{'totalexo'}{$a}) { $ref->{'totalexo'}{$a}=0 } ;	166	if (!$ref->{'totalexo'}{$a}) { $ref->{'totalexo'}{$a}=0 } ;
167	if (!$module) {	167	if (!$module) {
168	$T .= "<input type=\"~~radio~~\" name=\"taxon_$taxo\" id=\"$amod\" value=\"$amod\">"	168	$T .= "<input type=\"checkbox\" name=\"taxon_$taxo\" id=\"$amod\" value=\"$amod\">"
169	. "<label for=\"$amod\">$tit->{$a}</label><span class=\"small hidden\">($a)</span>";	169	. "<label for=\"$amod\">$tit->{$a}</label><span class=\"small hidden\">($a)</span>";
170	} else {	170	} else {
171	$T .= "<span class=\"tree_icon\" id=\"$amod\">$tit->{$a}</span><span class=\"small hidden\">($a)</span> ";	171	$T .= "<span class=\"tree_icon\" id=\"$amod\">$tit->{$a}</span><span class=\"small hidden\">($a)</span> ";
172	if ($ref->{'total'}{$a} >0){	172	if ($ref->{'total'}{$a} >0){
173	$T .= "<sup class=\"pastille taxo_nb_modules\">".$ref->{'total'}{$a}." \$name_M</sup>";	173	$T .= "<sup class=\"pastille taxo_nb_modules\">".$ref->{'total'}{$a}." \$name_M</sup>";