Re: wishlist: text in rollover,navbar buttons and class for anchortags

["F. Heinrichmeyer" <nospam@thanx>]

Here are diffs i made:



-- 
Fritz Heinrichmeyer mailto:fritz.heinrichmeyer@fernuni-hagen.de
FernUniversitaet Hagen, LG ES, 58084 Hagen (Germany)
tel:+49 2331/987-1166 fax:987-355 http://www-es.fernuni-hagen.de/~jfh
*** navbar.inc	Thu May 25 09:42:45 2000
--- /usr/local/lib/wml/include/des/navbar.wml	Fri May 19 14:40:17 2000
***************
*** 498,512 ****
          }
  
          #   output the button markup code
-  	if ($idselect and $txtcol_s) {
-             $txt = '<font color="'.$txtcol_s.'">'.$txt.'</font>';
-         }
-         elsif ($txtcol_n) {
-                 $txt = '<font color="'.$txtcol_n.'">'.$txt.'</font>';
-         }
          if ($#img < 0 or $txtonly) {
              #   cleanup txt information:
              #   special feature for supporting colorized hyperlinks
              #
              #   for a button without images
              #
--- 498,512 ----
          }
  
          #   output the button markup code
          if ($#img < 0 or $txtonly) {
              #   cleanup txt information:
              #   special feature for supporting colorized hyperlinks
+             if ($idselect and $txtcol_s) {
+                 $txt = '<font color="'.$txtcol_s.'">'.$txt.'</font>';
+             }
+             elsif ($txtcol_n) {
+                 $txt = '<font color="'.$txtcol_n.'">'.$txt.'</font>';
+             }
              #
              #   for a button without images
              #
***************
*** 521,527 ****
                      $js = qq# onMouseOver="self.status = '$hint'; return true"# .
                            qq# onMouseOut="self.status = ''; return true"#;
                  }
!                 $O .= '<a class=navbar href="'.$url.'"'.$target.$js.'>'.$txt.'</a>';
              }
          }
          else {
--- 521,527 ----
                      $js = qq# onMouseOver="self.status = '$hint'; return true"# .
                            qq# onMouseOut="self.status = ''; return true"#;
                  }
!                 $O .= '<a href="'.$url.'"'.$target.$js.'>'.$txt.'</a>';
              }
          }
          else {
***************
*** 531,537 ****
              $hint = $txt if ($hint eq '');
              $hint = '' if $nohints;
              if (($idselect and not $subselected) or $url eq '') {
!                 $O .= '<img src="'.$img[1].'" alt="'.$alt.'">'.$txt;
              }
              elsif ($idselect and $subselected) {
                  $js = '';
--- 531,537 ----
              $hint = $txt if ($hint eq '');
              $hint = '' if $nohints;
              if (($idselect and not $subselected) or $url eq '') {
!                 $O .= '<img src="'.$img[1].'" alt="'.$alt.'">';
              }
              elsif ($idselect and $subselected) {
                  $js = '';
***************
*** 544,552 ****
                      $js = qq# onMouseOver="self.status = '$hint'; return true"# .
                            qq# onMouseOut="self.status = ''; return true"#;
                  }
!                 $O .= '<a class=navbar href="'.$url.'"'.$target.$js.'>' .
                        '<img name="'.$nb.'_'.$id.'" src="'.$img[1].'" alt="'.$alt.'" border=0>' .
!                       $txt . '</a>';
              }
              else { # not selected 
                  $js = '';
--- 544,552 ----
                      $js = qq# onMouseOver="self.status = '$hint'; return true"# .
                            qq# onMouseOut="self.status = ''; return true"#;
                  }
!                 $O .= '<a href="'.$url.'"'.$target.$js.'>' .
                        '<img name="'.$nb.'_'.$id.'" src="'.$img[1].'" alt="'.$alt.'" border=0>' .
!                       '</a>';
              }
              else { # not selected 
                  $js = '';
***************
*** 559,567 ****
                      $js = qq# onMouseOver="self.status = '$hint'; return true"# .
                            qq# onMouseOut="self.status = ''; return true"#;
                  }
!                 $O .= '<a class=navbar href="'.$url.'"'.$target.$js.'>' .
                        '<img name="'.$nb.'_'.$id.'" src="'.$img[0].'" alt="'.$alt.'" border=0>' .
!                       $txt . '</a>';
              }
          }
  
--- 559,567 ----
                      $js = qq# onMouseOver="self.status = '$hint'; return true"# .
                            qq# onMouseOut="self.status = ''; return true"#;
                  }
!                 $O .= '<a href="'.$url.'"'.$target.$js.'>' .
                        '<img name="'.$nb.'_'.$id.'" src="'.$img[0].'" alt="'.$alt.'" border=0>' .
!                       '</a>';
              }
          }