[BACK]Return to lonhtmlcommon.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/lonhtmlcommon.pm between versions 1.413 and 1.416

version 1.413, 2024/06/03 20:41:06 version 1.416, 2025/02/14 22:42:05
Line 1861  document.addEventListener("DOMContentLoa Line 1861  document.addEventListener("DOMContentLoa
                 {                  {
                     regex = new RegExp ("\\p{Dash}", "gu");                      regex = new RegExp ("\\p{Dash}", "gu");
                 }                  }
                 catch (e) { regex = new RegExp ("[\\u058A\\u05BE\\u1400\\u1806\\u2010-\\u2015\\u2E3A\\u2E3B\\u2E5D\\u301C\\uFE58\\uFE63\\uFF0D]","g"); }                  catch (e) { regex = new RegExp ("[\\u058A\\u05BE\\u1400\\u1806\\u2010-\\u2015\\u2212\\u2E3A\\u2E3B\\u2E5D\\u301C\\uFE58\\uFE63\\uFF0D]","g"); }
                 p = p.replace(regex,'-');                  p = p.replace(regex,'-');
                 putInText(p);                  putInText(p);
             });              });
Line 1915  boolean, controls whether to include a l Line 1915  boolean, controls whether to include a l
   
 if 'nohelp' don't include the orange help link  if 'nohelp' don't include the orange help link
   
 =item $css_class  =item $crumbs_style
   
 optional name for the class to apply to the table for CSS  optional style attribute for div containing breadcrumbs
   unless called from docs_breadcrumbs
   
 =item $no_mt   =item $no_mt 
   
Line 1975  returns: nothing Line 1976  returns: nothing
     my %tools = ();      my %tools = ();
           
     sub breadcrumbs {      sub breadcrumbs {
         my ($component,$component_help,$menulink,$helplink,$css_class,$no_mt,           my ($component,$component_help,$menulink,$helplink,$crumbs_style,$no_mt, 
             $CourseBreadcrumbs,$topic_help,$topic_help_text,$links_target) = @_;              $CourseBreadcrumbs,$topic_help,$topic_help_text,$links_target) = @_;
         #          #
         $css_class ||= 'LC_breadcrumbs';  
   
         # Make the faq and bug data cascade          # Make the faq and bug data cascade
         my $faq  = '';          my $faq  = '';
         my $bug  = '';          my $bug  = '';
Line 2081  returns: nothing Line 2080  returns: nothing
   
         if ($lasttext ne '') {          if ($lasttext ne '') {
             $links .= &htmltag( 'li', htmltag($CourseBreadcrumbs ? 'b' : 'h1',              $links .= &htmltag( 'li', htmltag($CourseBreadcrumbs ? 'b' : 'h1',
                     $lasttext), {title => $lasttext});                      $lasttext));
         }          }
   
         my $icons = '';          my $icons = '';
Line 2133  returns: nothing Line 2132  returns: nothing
         }          }
         if (($links ne '') || ($nav_and_tools)) {          if (($links ne '') || ($nav_and_tools)) {
             &render_tools(\$links);              &render_tools(\$links);
             $links = &htmltag('div', $links,               unless ($CourseBreadcrumbs) {
                               { id => "LC_breadcrumbs" }) unless ($CourseBreadcrumbs) ;                  my $args = { id => 'LC_breadcrumbs' };
                   if ($crumbs_style ne '') {
                       $args->{'style'} = $crumbs_style;
                   }
                   $links = &htmltag('div', $links, $args);
               }
         }          }
         my $adv_tools = 0;          my $adv_tools = 0;
         if (ref($tools{'advtools'}) eq 'ARRAY') {          if (ref($tools{'advtools'}) eq 'ARRAY') {
Line 2151  returns: nothing Line 2155  returns: nothing
   
         # Return the breadcrumb's line          # Return the breadcrumb's line
   
               my $labeltext = &HTML::Entities::encode(&mt('Links for navigation and information'));
           return '<div class="LC_landmark" role="navigation" aria-label="'.$labeltext.'">'.$links.'</div>';    
         return "$links";  
     }      }
   
     sub clear_breadcrumbs {      sub clear_breadcrumbs {
Line 2486  END Line 2489  END
 }  }
   
 sub row_title {  sub row_title {
     my ($title,$css_title_class,$css_value_class, $css_value_furtherAttributes) = @_;      my ($title,$css_title_class,$css_value_class,$css_value_furtherAttributes) = @_;
     $row_count[0]++;      $row_count[0]++;
     my $css_class = ($row_count[0] % 2)?'LC_odd_row':'LC_even_row';      my $css_class = ($row_count[0] % 2)?'LC_odd_row':'LC_even_row';
     $css_title_class ||= 'LC_pick_box_title';      $css_title_class ||= 'LC_pick_box_title';
Line 2499  sub row_title { Line 2502  sub row_title {
     }      }
     my $output = <<"ENDONE";      my $output = <<"ENDONE";
            <tr class="LC_pick_box_row" $css_value_furtherAttributes>              <tr class="LC_pick_box_row" $css_value_furtherAttributes> 
             <td $css_title_class>              <th $css_title_class>
        $title         $title
             </td>              </th>
             <td class="$css_value_class $css_class">              <td class="$css_value_class $css_class">
 ENDONE  ENDONE
     return $output;      return $output;
Removed from v.1.413  
changed lines
  Added in v.1.416

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>