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

Diff for /loncom/interface/loncommon.pm between versions 1.755 and 1.775

version 1.755, 2009/02/25 13:25:52 version 1.775, 2009/03/21 21:41:14
Line 924  sub help_open_topic { Line 924  sub help_open_topic {
   
     # Add the text      # Add the text
     if ($text ne "") {      if ($text ne "") {
  $template.="<a style=\"background-color:#3333AA;\" target=\"_top\" href=\"$link\"><span style=\"color:#FFFFFF;\">$text</span></a>";   $template.='<span class="LC_help_open_topic">'
                     .'<a target="_top" href="'.$link.'">'
                     .$text.'</a>';
     }      }
   
     # Add the graphic      # (Always) Add the graphic
     my $title = &mt('Online Help');      my $title = &mt('Online Help');
     my $helpicon=&lonhttpdurl("/adm/help/help.png");      my $helpicon=&lonhttpdurl("/adm/help/help.png");
     $template .= <<"ENDTEMPLATE";      $template.=' <a target="_top" href="'.$link.'" title="'.$title.'">'
  <a target="_top" href="$link" title="$title"><img src="$helpicon" border="0" alt="(Help: $topic)" /></a>                .'<img src="'.$helpicon.'" border="0"'
 ENDTEMPLATE                .' alt="'.&mt('Help: [_1]',$topic).'"'
                     .' title="'.$title.'"'
                 .' /></a>';
       if ($text ne "") {
           $template.='</span>';
       }
     return $template;      return $template;
   
 }  }
Line 945  sub helpLatexCheatsheet { Line 951  sub helpLatexCheatsheet {
     my $out;      my $out;
     my $addOther = '';      my $addOther = '';
     if ($topic) {      if ($topic) {
  $addOther = &Apache::loncommon::help_open_topic($topic,$text,   $addOther = '<span>'.&Apache::loncommon::help_open_topic($topic,&mt($text),
        undef, undef, 600).         undef, undef, 600).
    '</td><td>';     '</span> ';
     }      }
     $out = '<table><tr><td>'.      $out = '<span>' # Start cheatsheet
    $addOther .    .$addOther
    &Apache::loncommon::help_open_topic("Greek_Symbols",&mt('Greek Symbols'),            .'<span>'
        undef,undef,600).    .&Apache::loncommon::help_open_topic('Greek_Symbols',&mt('Greek Symbols'),
    '</td><td>'.         undef,undef,600)
    &Apache::loncommon::help_open_topic("Other_Symbols",&mt('Other Symbols'),    .'</span> <span>'
        undef,undef,600).    .&Apache::loncommon::help_open_topic('Other_Symbols',&mt('Other Symbols'),
    '</td>';         undef,undef,600)
     .'</span>';
     unless ($not_author) {      unless ($not_author) {
         $out .= '<td>'.          $out .= ' <span>'
         &Apache::loncommon::help_open_topic("Authoring_Output_Tags",&mt('Output Tags'),         .&Apache::loncommon::help_open_topic('Authoring_Output_Tags',&mt('Output Tags'),
                                             undef,undef,600).                                              undef,undef,600)
         '</td>';         .'</span>';
     }      }
     $out .= '</tr></table>';      $out .= '</span>'; # End cheatsheet
     return $out;      return $out;
 }  }
   
Line 2119  sub authform_kerberos { Line 2126  sub authform_kerberos {
         $autharg,$jscall);          $autharg,$jscall);
     my ($authnum,%can_assign) =  &get_assignable_auth($in{'domain'});      my ($authnum,%can_assign) =  &get_assignable_auth($in{'domain'});
     if ($in{'kerb_def_auth'} eq 'krb5') {      if ($in{'kerb_def_auth'} eq 'krb5') {
        $check5 = ' checked="on"';         $check5 = ' checked="checked"';
     } else {      } else {
        $check4 = ' checked="on"';         $check4 = ' checked="checked"';
     }      }
     $krbarg = $in{'kerb_def_dom'};      $krbarg = $in{'kerb_def_dom'};
     if (defined($in{'curr_authtype'})) {      if (defined($in{'curr_authtype'})) {
         if ($in{'curr_authtype'} eq 'krb') {          if ($in{'curr_authtype'} eq 'krb') {
             $krbcheck = ' checked="on"';              $krbcheck = ' checked="checked"';
             if (defined($in{'mode'})) {              if (defined($in{'mode'})) {
                 if ($in{'mode'} eq 'modifyuser') {                  if ($in{'mode'} eq 'modifyuser') {
                     $krbcheck = '';                      $krbcheck = '';
Line 2134  sub authform_kerberos { Line 2141  sub authform_kerberos {
             }              }
             if (defined($in{'curr_kerb_ver'})) {              if (defined($in{'curr_kerb_ver'})) {
                 if ($in{'curr_krb_ver'} eq '5') {                  if ($in{'curr_krb_ver'} eq '5') {
                     $check5 = ' checked="on"';                      $check5 = ' checked="checked"';
                     $check4 = '';                      $check4 = '';
                 } else {                  } else {
                     $check4 = ' checked="on"';                      $check4 = ' checked="checked"';
                     $check5 = '';                      $check5 = '';
                 }                  }
             }              }
Line 2228  sub authform_internal{ Line 2235  sub authform_internal{
     if (defined($in{'curr_authtype'})) {      if (defined($in{'curr_authtype'})) {
         if ($in{'curr_authtype'} eq 'int') {          if ($in{'curr_authtype'} eq 'int') {
             if ($can_assign{'int'}) {              if ($can_assign{'int'}) {
                 $intcheck = 'checked="on" ';                  $intcheck = 'checked="checked" ';
                 if (defined($in{'mode'})) {                  if (defined($in{'mode'})) {
                     if ($in{'mode'} eq 'modifyuser') {                      if ($in{'mode'} eq 'modifyuser') {
                         $intcheck = '';                          $intcheck = '';
Line 2283  sub authform_local{ Line 2290  sub authform_local{
     if (defined($in{'curr_authtype'})) {      if (defined($in{'curr_authtype'})) {
         if ($in{'curr_authtype'} eq 'loc') {          if ($in{'curr_authtype'} eq 'loc') {
             if ($can_assign{'loc'}) {              if ($can_assign{'loc'}) {
                 $loccheck = 'checked="on" ';                  $loccheck = 'checked="checked" ';
                 if (defined($in{'mode'})) {                  if (defined($in{'mode'})) {
                     if ($in{'mode'} eq 'modifyuser') {                      if ($in{'mode'} eq 'modifyuser') {
                         $loccheck = '';                          $loccheck = '';
Line 2337  sub authform_filesystem{ Line 2344  sub authform_filesystem{
     if (defined($in{'curr_authtype'})) {      if (defined($in{'curr_authtype'})) {
         if ($in{'curr_authtype'} eq 'fsys') {          if ($in{'curr_authtype'} eq 'fsys') {
             if ($can_assign{'fsys'}) {              if ($can_assign{'fsys'}) {
                 $fsyscheck = 'checked="on" ';                  $fsyscheck = 'checked="checked" ';
                 if (defined($in{'mode'})) {                  if (defined($in{'mode'})) {
                     if ($in{'mode'} eq 'modifyuser') {                      if ($in{'mode'} eq 'modifyuser') {
                         $fsyscheck = '';                          $fsyscheck = '';
Line 2808  sub aboutmewrapper { Line 2815  sub aboutmewrapper {
         return;          return;
     }      }
     return '<a href="/adm/'.$domain.'/'.$username.'/aboutme"'.      return '<a href="/adm/'.$domain.'/'.$username.'/aboutme"'.
  ($target?' target="$target"':'').' title="'.&mt("View this user's personal    ($target?' target="$target"':'').' title="'.&mt("View this user's personal information page").'">'.$link.'</a>';
 homepage").'">'.$link.'</a>';  
 }  }
   
 # ------------------------------------------------------------ Syllabus Wrapper  # ------------------------------------------------------------ Syllabus Wrapper
Line 3816  sub blocking_status { Line 3822  sub blocking_status {
                              &Apache::lonnet::coursedescription($course);                               &Apache::lonnet::coursedescription($course);
                         $coursedesc = $courseinfo{'description'};                          $coursedesc = $courseinfo{'description'};
                     }                      }
                     $category = "Group files in the course '$coursedesc'";                      $category = "Group portfolio in the course '$coursedesc'";
                 } else {                  } else {
                     $category = 'Portfolio files belonging to ';                      $category = 'Portfolio files belonging to ';
                     if ($env{'user.name'} eq 'public' &&                       if ($env{'user.name'} eq 'public' && 
Line 4245  $realm&nbsp; Line 4251  $realm&nbsp;
 </td>  </td>
 ENDROLE  ENDROLE
   
     my $titleinfo = '<span class="LC_title_bar_title">'.$title.'</span>';      my $titleinfo = '<h1>'.$title.'</h1>';
     if ($customtitle) {      if ($customtitle) {
         $titleinfo = $customtitle;          $titleinfo = $customtitle;
     }      }
Line 4515  table.thinborder tr td { Line 4521  table.thinborder tr td {
   
 form, .inline { display: inline; }  form, .inline { display: inline; }
   
 .LC_center { text-align: center; }  
 .LC_left { text-align:left; }  
 .LC_right {text-align:right;}  .LC_right {text-align:right;}
 .LC_middle {vertical-align:middle;}  .LC_middle {vertical-align:middle;}
 .LC_top {vertical-align:top;}  
 .LC_bottom {vertical-align:bottom;}  
   
 /* just for tests */  /* just for tests */
 .LC_300Box { width:300px; }  
 .LC_400Box {width:400px; }  .LC_400Box {width:400px; }
 .LC_500Box {width:500px; }  
 .LC_600Box {width:600px; }  
 .LC_800Box {width:800px;}  
 /* end */  /* end */
   
 .LC_filename {font-family: $mono; white-space:pre;}  .LC_filename {font-family: $mono; white-space:pre;}
Line 4550  form, .inline { display: inline; } Line 4548  form, .inline { display: inline; }
 }  }
   
 .LC_icon {  .LC_icon {
   border: 0px;    border: none;
 }  }
   
 .LC_indexer_icon {  .LC_indexer_icon {
   border: 0px;    border: 0px;
   height: 22px;    height: 22px;
Line 4559  form, .inline { display: inline; } Line 4558  form, .inline { display: inline; }
 .LC_docs_spacer {  .LC_docs_spacer {
   width: 25px;    width: 25px;
   height: 1px;    height: 1px;
   border: 0px;    border: none;
 }  }
   
 .LC_internal_info {  .LC_internal_info {
Line 4603  table.LC_docs_path { Line 4602  table.LC_docs_path {
 table#LC_title_bar td {  table#LC_title_bar td {
   background: $tabbg;    background: $tabbg;
 }  }
 table#LC_title_bar td.LC_title_bar_who {  table#LC_title_bar .LC_title_bar_who {
   background: $tabbg;    background: $tabbg;
   color: $font;    color: $font;
   font: small $sans;    font: small $sans;
   text-align: right;    text-align: right;
     margin: 0px;
   }
   table#LC_title_bar .LC_title_bar_name {
     margin: 0px;
   }
   table#LC_title_bar .LC_title_bar_role {
     margin: 0px;
   }
   table#LC_title_bar .LC_title_bar_realm {
     margin: 0px;
 }  }
 span.LC_metadata {  span.LC_metadata {
     font-family: $sans;      font-family: $sans;
 }  }
 span.LC_title_bar_title {  
   font: bold x-large $sans;  
 }  
 table#LC_title_bar td.LC_title_bar_domain_logo {  table#LC_title_bar td.LC_title_bar_domain_logo {
   background: $sidebg;    background: $sidebg;
   text-align: right;    text-align: right;
Line 4649  table#LC_top_nav td.LC_top_nav_logo img Line 4655  table#LC_top_nav td.LC_top_nav_logo img
   border: 0px;    border: 0px;
   vertical-align: bottom;    vertical-align: bottom;
 }  }
 table#LC_top_nav td.LC_top_nav_exit,  
 table#LC_top_nav td.LC_top_nav_help {  
   width: 2.0em;  
 }  
 table#LC_top_nav td.LC_top_nav_login {  table#LC_top_nav td.LC_top_nav_login {
   width: 4.0em;    width: 4.0em;
   text-align: center;    text-align: center;
Line 4663  table.LC_breadcrumbs td, table.LC_docs_p Line 4665  table.LC_breadcrumbs td, table.LC_docs_p
   font-family: $sans;    font-family: $sans;
   font-size: smaller;    font-size: smaller;
 }  }
 table.LC_breadcrumbs td.LC_breadcrumbs_component,  
 table.LC_docs_path td.LC_docs_path_component {  
   background: $tabbg;  
   color: $font;  
   font-family: $sans;  
   font-size: larger;  
   text-align: right;  
 }  
 td.LC_table_cell_checkbox {  td.LC_table_cell_checkbox {
   text-align: center;    text-align: center;
 }  }
 table#LC_mainmenu td.LC_mainmenu_column {  
     vertical-align: top;  
 }  
   
 .LC_fontsize_small  .LC_fontsize_small
 {  {
Line 4693  table#LC_mainmenu td.LC_mainmenu_column Line 4684  table#LC_mainmenu td.LC_mainmenu_column
  font-size: 120%;   font-size: 120%;
 }  }
   
 .LC_fontcolor_red  
 {  
  color: #FF0000;  
 }  
   
 .LC_menubuttons_inline_text {  .LC_menubuttons_inline_text {
   color: $font;    color: $font;
   font-family: $sans;    font-family: $sans;
Line 4884  table.LC_calendar tr td { Line 4870  table.LC_calendar tr td {
 table.LC_calendar tr td.LC_calendar_day_empty {  table.LC_calendar tr td.LC_calendar_day_empty {
   background-color: $data_table_dark;    background-color: $data_table_dark;
 }  }
 table.LC_calendar tr td.LC_calendar_day_current {  
   background-color: $data_table_highlight;  
 }  
   
 table.LC_mail_list tr.LC_mail_new {  table.LC_mail_list tr.LC_mail_new {
   background-color: $mail_new;    background-color: $mail_new;
Line 4912  table.LC_mail_list tr.LC_mail_other { Line 4895  table.LC_mail_list tr.LC_mail_other {
 table.LC_mail_list tr.LC_mail_other:hover {  table.LC_mail_list tr.LC_mail_other:hover {
   background-color: $mail_other_hover;    background-color: $mail_other_hover;
 }  }
 table.LC_mail_list tr.LC_mail_even {  
 }  
 table.LC_mail_list tr.LC_mail_odd {  
 }  
   
 table.LC_data_table tr > td.LC_browser_file,  table.LC_data_table tr > td.LC_browser_file {
 table.LC_data_table tr > td.LC_browser_file_published {  
   background: #CCFF88;    background: #CCFF88;
 }  }
 table.LC_data_table tr > td.LC_browser_file_locked,  table.LC_data_table tr > td.LC_browser_file_locked {
 table.LC_data_table tr > td.LC_browser_file_unpublished {  
   background: #FFAA99;    background: #FFAA99;
 }  }
 table.LC_data_table tr > td.LC_browser_file_obsolete {  
   background: #AAAAAA;  
 }  
 table.LC_data_table tr > td.LC_browser_file_modified,  
 table.LC_data_table tr > td.LC_browser_file_metamodified {  
   background: #FFFF77;  
 }  
 table.LC_data_table tr.LC_browser_folder > td {  table.LC_data_table tr.LC_browser_folder > td {
   background: #CCCCFF;    background: #CCCCFF;
 }  }
Line 4983  span.LC_parm_folder, span.LC_parm_symb { Line 4953  span.LC_parm_folder, span.LC_parm_symb {
 }  }
   
 td.LC_parm_overview_level_menu, td.LC_parm_overview_map_menu,  td.LC_parm_overview_level_menu, td.LC_parm_overview_map_menu,
 td.LC_parm_overview_parm_selectors, td.LC_parm_overview_parm_restrictions {  td.LC_parm_overview_parm_selectors {
   border: 1px solid black;    border: 1px solid black;
   border-collapse: collapse;    border-collapse: collapse;
 }  }
Line 5236  table.LC_prior_tries td { Line 5206  table.LC_prior_tries td {
   background: #AAAAFF;    background: #AAAAFF;
   color: black;    color: black;
 }  }
 .LC_answer_no_message {  
   background: #FFFFFF;  
   color: black;  
 }  
 .LC_answer_unknown {  
   background: orange;  
   color: black;  
 }  
   
   
 span.LC_prior_numerical,  span.LC_prior_numerical,
Line 5273  table.LC_prior_match tr td { Line 5235  table.LC_prior_match tr td {
   border: 1px solid #000000;    border: 1px solid #000000;
 }  }
   
   td.LC_nobreak,
 span.LC_nobreak {  span.LC_nobreak {
   white-space: nowrap;    white-space: nowrap;
 }  }
Line 5292  table.LC_docs_documents { Line 5255  table.LC_docs_documents {
   border-collapse: collapse;    border-collapse: collapse;
 }  }
   
 table.LC_docs_documents td.LC_docs_document {  
   border: 2px solid black;  
   padding: 4px;  
 }  
   
 .LC_docs_entry_move {  .LC_docs_entry_move {
   border: 0px;    border: 0px;
   border-collapse: collapse;    border-collapse: collapse;
Line 5515  table#LC_mainmenu td.LC_mainmenu_col_fie Line 5473  table#LC_mainmenu td.LC_mainmenu_col_fie
   vertical-align: top;    vertical-align: top;
   width: 45%;    width: 45%;
 }  }
 .LC_mainmenu_fieldset_category {  
   color: $font;  
   background: $pgbg;  
   font-family: $sans;  
   font-size: small;  
   font-weight: bold;  
 }  
   
 div.LC_createcourse {  div.LC_createcourse {
     margin: 10px 10px 10px 10px;      margin: 10px 10px 10px 10px;
Line 5566  h2,h3,h4,h5,h6 Line 5517  h2,h3,h4,h5,h6
         border:0px;          border:0px;
 }  }
   
 .LC_bgLightGrey{  
  background:URL(/adm/lonIcons/lightGreyBG.png) repeat-x left bottom;  
 }  
   
   
 /* Main Header with discription of Person, Course, etc. */  /* Main Header with discription of Person, Course, etc. */
 .LC_HeadRight {  
  text-align: right;  .LC_Right {
  float: right;          float: right;
  margin: 0px;          margin: 0px;
  padding: 0px;          padding: 0px;
         right:0;  
         position:absolute;  
         overflow:hidden;  
 }  }
   
 p, .LC_ContentBox {  p, .LC_ContentBox {
Line 5593  p, .LC_ContentBox { Line 5537  p, .LC_ContentBox {
         text-decoration:underline;          text-decoration:underline;
 }  }
   
   .LC_help_open_topic {
           color: #FFFFFF;
           background-color: #EEEEFF;
           margin: 1px;
           padding: 4px;
           border: 1px solid #000033;
           white-space: nowrap;
   }
   
 dl,ul,div,fieldset {  dl,ul,div,fieldset {
  margin: 10px 10px 10px 0px;   margin: 10px 10px 10px 0px;
Line 5617  ol.LC_smallMenu a { Line 5569  ol.LC_smallMenu a {
  color: RGB(80, 80, 80);   color: RGB(80, 80, 80);
  text-decoration: none;   text-decoration: none;
 }  }
 ol#LC_TabMainMenueContent, ul.LC_TabContent ,  ol#LC_TabMainMenuContent, ul.LC_TabContent ,
 ul.LC_TabContentBigger {  ul.LC_TabContentBigger {
  display:block;   display:block;
  list-style:none;   list-style:none;
Line 5661  ul.LC_TabContent li a, ul.LC_TabContent Line 5613  ul.LC_TabContent li a, ul.LC_TabContent
  text-decoration:none;   text-decoration:none;
  font-size:95%;   font-size:95%;
  font-weight:bold;   font-weight:bold;
    padding-right: 16px;
 }  }
 ul.LC_TabContent li:hover, ul.LC_TabContent li.active{  ul.LC_TabContent li:hover, ul.LC_TabContent li.active{
  background-color:#FFFFFF;          background:#FFFFFF url(/adm/lonIcons/open.gif) no-repeat scroll right center;
  border-bottom:solid 1px #FFFFFF;   border-bottom:solid 1px #FFFFFF;
    padding-right: 16px;
 }  }
 ul.LC_TabContentBigger li{  ul.LC_TabContentBigger li{
  vertical-align:bottom;   vertical-align:bottom;
Line 5681  ul.LC_TabContentBigger li, ul.LC_TabCont Line 5635  ul.LC_TabContentBigger li, ul.LC_TabCont
  font-size:110%;   font-size:110%;
  font-weight:bold;   font-weight:bold;
 }  }
 #LC_CourseDocuments, #LC_SupplementalCourseDocuments  
 {  
  margin:0px;  
 }  
   
 .LC_hideThis  
 {  
  display:none;  
  visibility:hidden;  
 }  
   
 ol#LC_MenuBreadcrumbs, ol#LC_PathBreadcrumbs {  ol#LC_MenuBreadcrumbs, ol#LC_PathBreadcrumbs {
  border-top: solid 1px RGB(255, 255, 255);   border-top: solid 1px RGB(255, 255, 255);
Line 5753  dl.LC_ListStyleClean dd { Line 5697  dl.LC_ListStyleClean dd {
 .LC_ListStyleClean,  .LC_ListStyleClean,
 .LC_ListStyleSimple,  .LC_ListStyleSimple,
 .LC_ListStyleNormal,  .LC_ListStyleNormal,
 .LC_ListStyleNormal_Border,  
 .LC_ListStyleSpecial  .LC_ListStyleSpecial
  {   {
  /*display:block; */   /*display:block; */
Line 5890  table em{ Line 5833  table em{
  font-weight: bold;   font-weight: bold;
  font-style: normal;   font-style: normal;
 }  }
   table.LC_tableBrowseRes, 
 table#LC_tableOfContent{  table.LC_tableOfContent{
  border-collapse: collapse;          border:none;
  border-spacing: 0;   border-spacing: 1;
  padding: 3px;   padding: 3px;
  border: 0;  
  background-color: #FFFFFF;   background-color: #FFFFFF;
  font-size: 90%;   font-size: 90%;
 }  }
 table#LC_tableOfContent a {  table.LC_tableBrowseRes a,
   table.LC_tableOfContent a {
           background-color: transparent;
  text-decoration: none;   text-decoration: none;
 }  }
   
 table#LC_tableOfContent tr.LC_trOdd{  table.LC_tableBrowseRes tr.LC_trOdd,
   table.LC_tableOfContent tr.LC_trOdd{
  background-color: #EEEEEE;   background-color: #EEEEEE;
 }  }
   
 table#LC_tableOfContent img{  table.LC_tableOfContent img{
  border: none;   border: none;
  height: 1.3em;   height: 1.3em;
  vertical-align: text-bottom;   vertical-align: text-bottom;
  margin-right: 0.3em;   margin-right: 0.3em;
 }  }
   
   a#LC_content_toolbar_firsthomework{
    background-image:url(/res/adm/pages/open-first-problem.gif);
   }
   
   a#LC_content_toolbar_launchnav{
    background-image:url(/res/adm/pages/start-navigation.gif);
   }
   
   a#LC_content_toolbar_closenav{
    background-image:url(/res/adm/pages/close-navigation.gif);
   }
   
   a#LC_content_toolbar_everything{
    background-image:url(/res/adm/pages/show-all.gif);
   }
   
   a#LC_content_toolbar_uncompleted{
    background-image:url(/res/adm/pages/show-incomplete-problems.gif);
   }
   
   #LC_content_toolbar_clearbubbles{
    background-image:url(/res/adm/pages/mark-discussionentries-read.gif);
   }
   
   a#LC_content_toolbar_changefolder{
    background : url(/res/adm/pages/close-all-folders.gif) top center ;
   }
   
   a#LC_content_toolbar_changefolder_toggled{
    background-image:url(/res/adm/pages/open-all-folders.gif);
   }
   
   ul#LC_toolbar li a:hover{
    background-position: bottom center;
   }
   
   ul#LC_toolbar{
    padding:0; 
    margin: 2px;
    list-style:none;
    position:relative;
    background-color:white;
   }
   
   ul#LC_toolbar li{
    border:1px solid white;
    padding:0;
    margin: 0;
       float: left;
    display:inline;
    vertical-align:middle;
   }
   
   a.LC_toolbarItem{
    display:block;
    padding:0;
    margin:0;
    height: 32px;
    width: 32px;
    color:white; 
    border:0 none;
    background-repeat:no-repeat;
    background-color:transparent;
   }
   
   
 END  END
 }  }
   
Line 6182  sub start_page { Line 6194  sub start_page {
  $result = &html_encode($result);   $result = &html_encode($result);
     }      }
   
     if (exists($args->{'bread_crumbs'})) {   #Breadcrumbs
         &Apache::lonhtmlcommon::clear_breadcrumbs();      if (exists($args->{'bread_crumbs'}) or exists($args->{'bread_crumbs_component'})) {
         if (ref($args->{'bread_crumbs'}) eq 'ARRAY') {            &Apache::lonhtmlcommon::clear_breadcrumbs();
             foreach my $crumb (@{$args->{'bread_crumbs'}}){   #if any br links exists, add them to the breadcrumbs
                 &Apache::lonhtmlcommon::add_breadcrumb($crumb);   if (exists($args->{'bread_crumbs'}) and ref($args->{'bread_crumbs'}) eq 'ARRAY') {         
             }   foreach my $crumb (@{$args->{'bread_crumbs'}}){
         }   &Apache::lonhtmlcommon::add_breadcrumb($crumb);
         $result .= &Apache::lonhtmlcommon::breadcrumbs();   }
     }   }
   
    #if bread_crumbs_component exists show it as headline else show only the breadcrumbs
    if(exists($args->{'bread_crumbs_component'})){
    $result .= &Apache::lonhtmlcommon::breadcrumbs($args->{'bread_crumbs_component'});
    }else{
    $result .= &Apache::lonhtmlcommon::breadcrumbs();
    }
       }
     return $result;      return $result;
 }  }
   
Line 6952  sub default_quota { Line 6971  sub default_quota {
                                             ['quotas'],$udom);                                              ['quotas'],$udom);
     if (ref($quotahash{'quotas'}) eq 'HASH') {      if (ref($quotahash{'quotas'}) eq 'HASH') {
         if ($inststatus ne '') {          if ($inststatus ne '') {
             my @statuses = split(/:/,$inststatus);              my @statuses = map { &unescape($_); } split(/:/,$inststatus);
             foreach my $item (@statuses) {              foreach my $item (@statuses) {
                 if (ref($quotahash{'quotas'}{'defaultquota'}) eq 'HASH') {                  if (ref($quotahash{'quotas'}{'defaultquota'}) eq 'HASH') {
                     if ($quotahash{'quotas'}{'defaultquota'}{$item} ne '') {                      if ($quotahash{'quotas'}{'defaultquota'}{$item} ne '') {
Line 7418  sub personal_data_fieldtitles { Line 7437  sub personal_data_fieldtitles {
                         middlename => 'Middle Name',                          middlename => 'Middle Name',
                         generation => 'Generation',                          generation => 'Generation',
                         gen => 'Generation',                          gen => 'Generation',
                           inststatus => 'Affiliation',
                    );                     );
     return %fieldtitles;      return %fieldtitles;
 }  }
Line 8783  sub restore_settings { Line 8803  sub restore_settings {
   
 =item * &build_recipient_list()  =item * &build_recipient_list()
   
 Build recipient lists for three types of e-mail:  Build recipient lists for four types of e-mail:
 (a) Error Reports, (b) Package Updates, (c) Help requests, generated by  (a) Error Reports, (b) Package Updates, (c) lonstatus warnings/errors
 lonerrorhandler.pm, CHECKRPMS and lonsupportreq.pm respectively.  (d) Help requests, generated by
   lonerrorhandler.pm, CHECKRPMS, loncron, and lonsupportreq.pm respectively.
   
 Inputs:  Inputs:
 defmail (scalar - email address of default recipient),   defmail (scalar - email address of default recipient), 
Line 8809  sub build_recipient_list { Line 8830  sub build_recipient_list {
     my %domconfig =      my %domconfig =
          &Apache::lonnet::get_dom('configuration',['contacts'],$defdom);           &Apache::lonnet::get_dom('configuration',['contacts'],$defdom);
     if (ref($domconfig{'contacts'}) eq 'HASH') {      if (ref($domconfig{'contacts'}) eq 'HASH') {
         if (ref($domconfig{'contacts'}{$mailing}) eq 'HASH') {          if (exists($domconfig{'contacts'}{$mailing})) {
             my @contacts = ('adminemail','supportemail');              if (ref($domconfig{'contacts'}{$mailing}) eq 'HASH') {
             foreach my $item (@contacts) {                  my @contacts = ('adminemail','supportemail');
                 if ($domconfig{'contacts'}{$mailing}{$item}) {                  foreach my $item (@contacts) {
                     my $addr = $domconfig{'contacts'}{$item};                       if ($domconfig{'contacts'}{$mailing}{$item}) {
                     if (!grep(/^\Q$addr\E$/,@recipients)) {                          my $addr = $domconfig{'contacts'}{$item}; 
                         push(@recipients,$addr);                          if (!grep(/^\Q$addr\E$/,@recipients)) {
                               push(@recipients,$addr);
                           }
                     }                      }
                       $otheremails = $domconfig{'contacts'}{$mailing}{'others'};
                 }                  }
                 $otheremails = $domconfig{'contacts'}{$mailing}{'others'};  
             }              }
           } elsif ($origmail ne '') {
               push(@recipients,$origmail);
         }          }
     } elsif ($origmail ne '') {      } elsif ($origmail ne '') {
         push(@recipients,$origmail);          push(@recipients,$origmail);
Line 9090  sub assign_categories_table { Line 9115  sub assign_categories_table {
                     my $checked = '';                      my $checked = '';
                     if (@currcategories > 0) {                      if (@currcategories > 0) {
                         if (grep(/^\Q$item\E$/,@currcategories)) {                          if (grep(/^\Q$item\E$/,@currcategories)) {
                             $checked = ' checked="checked" ';                              $checked = ' checked="checked"';
                         }                          }
                     }                      }
                     $output .= '<tr '.$css_class.'><td><span class="LC_nobreak">'.                      $output .= '<tr '.$css_class.'><td><span class="LC_nobreak">'.
Line 9156  sub assign_category_rows { Line 9181  sub assign_category_rows {
                     if (ref($currcategories) eq 'ARRAY') {                      if (ref($currcategories) eq 'ARRAY') {
                         if (@{$currcategories} > 0) {                          if (@{$currcategories} > 0) {
                             if (grep(/^\Q$item\E$/,@{$currcategories})) {                              if (grep(/^\Q$item\E$/,@{$currcategories})) {
                                 $checked = ' checked="checked" ';                                  $checked = ' checked="checked"';
                             }                              }
                         }                          }
                     }                      }
Line 9928  sub init_user_environment { Line 9953  sub init_user_environment {
                 &Apache::lonnet::usertools_access($username,$domain,$tool,'reload');                  &Apache::lonnet::usertools_access($username,$domain,$tool,'reload');
         }          }
   
           foreach my $crstype ('official','unofficial') {
               $userenv{'canrequest.'.$crstype} =
                   &Apache::lonnet::usertools_access($username,$domain,$crstype,
                                                     'reload','requestcourses');
           }
   
  $env{'user.environment'} = "$lonids/$cookie.id";   $env{'user.environment'} = "$lonids/$cookie.id";
   
  if (tie(my %disk_env,'GDBM_File',"$lonids/$cookie.id",   if (tie(my %disk_env,'GDBM_File',"$lonids/$cookie.id",
Removed from v.1.755  
changed lines
  Added in v.1.775

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