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

Diff for /loncom/interface/loncommon.pm between versions 1.919 and 1.929

version 1.919, 2009/11/23 21:45:18 version 1.929, 2009/12/16 14:21:59
Line 1719  sub create_workbook { Line 1719  sub create_workbook {
     my $workbook  = Spreadsheet::WriteExcel->new('/home/httpd'.$filename);      my $workbook  = Spreadsheet::WriteExcel->new('/home/httpd'.$filename);
     if (! defined($workbook)) {      if (! defined($workbook)) {
         $r->log_error("Error creating excel spreadsheet $filename: $!");          $r->log_error("Error creating excel spreadsheet $filename: $!");
         $r->print('<p>'.&mt("Unable to create new Excel file.  ".          $r->print(
                             "This error has been logged.  ".              '<p class="LC_error">'
                             "Please alert your LON-CAPA administrator").             .&mt('Problems occurred in creating the new Excel file.')
                   '</p>');             .' '.&mt('This error has been logged.')
              .' '.&mt('Please alert your LON-CAPA administrator.')
              .'</p>'
           );
         return (undef);          return (undef);
     }      }
     #      #
Line 1762  sub create_text_file { Line 1765  sub create_text_file {
     $fh = Apache::File->new('>/home/httpd'.$filename);      $fh = Apache::File->new('>/home/httpd'.$filename);
     if (! defined($fh)) {      if (! defined($fh)) {
         $r->log_error("Couldn't open $filename for output $!");          $r->log_error("Couldn't open $filename for output $!");
         $r->print(&mt('Problems occurred in creating the output file. '          $r->print(
                      .'This error has been logged. '              '<p class="LC_error">'
                      .'Please alert your LON-CAPA administrator.'));             .&mt('Problems occurred in creating the output file.')
              .' '.&mt('This error has been logged.')
              .' '.&mt('Please alert your LON-CAPA administrator.')
              .'</p>'
           );
     }      }
     return ($fh,$filename)      return ($fh,$filename)
 }  }
Line 1877  sub select_form { Line 1884  sub select_form {
         $selectform.=          $selectform.=
     '<option value="'.&HTML::Entities::encode($key,'"<>&').'" '.      '<option value="'.&HTML::Entities::encode($key,'"<>&').'" '.
             ($key eq $def ? 'selected="selected" ' : '').              ($key eq $def ? 'selected="selected" ' : '').
                 ">".&mt($hash{$key})."</option>\n";                  ">".$hash{$key}."</option>\n";
     }      }
     $selectform.="</select>";      $selectform.="</select>";
     return $selectform;      return $selectform;
Line 4367  sub CSTR_pageheader { Line 4374  sub CSTR_pageheader {
     } else {      } else {
         $lastitem = $thisdisfn;          $lastitem = $thisdisfn;
     }      }
     return  
       my $output =
          '<div>'           '<div>'
         .&Apache::loncommon::help_open_menu('','',3,'Authoring') #FIXME: Broken? Where is it?          .&Apache::loncommon::help_open_menu('','',3,'Authoring') #FIXME: Broken? Where is it?
         .'<b>'.&mt('Construction Space:').'</b> '          .'<b>'.&mt('Construction Space:').'</b> '
         .'<form name="dirs" method="post" action="'.$formaction          .'<form name="dirs" method="post" action="'.$formaction
         .'" target="_top"><tt><b>' #FIXME lonpubdir: target="_parent"          .'" target="_top">' #FIXME lonpubdir: target="_parent"
         .&Apache::lonhtmlcommon::crumbs($uname.'/'.$parentpath,'_top','/priv','','+1',1)."$lastitem</b></tt><br />"          .&Apache::lonhtmlcommon::crumbs($uname.'/'.$parentpath,'_top','/priv',undef,undef);
   
       if ($lastitem) {
           $output .=
                '<span class="LC_filename">'
               .$lastitem
               .'</span>';
       }
       $output .=
            '<br />'
         #FIXME lonpubdir: &Apache::lonhtmlcommon::crumbs($uname.$thisdisfn.'/','_top','/priv','','+1',1)."</b></tt><br />"          #FIXME lonpubdir: &Apache::lonhtmlcommon::crumbs($uname.$thisdisfn.'/','_top','/priv','','+1',1)."</b></tt><br />"
         .&Apache::lonhtmlcommon::select_recent('construct','recent','this.form.action=this.form.recent.value;this.form.submit()')          .&Apache::lonhtmlcommon::select_recent('construct','recent','this.form.action=this.form.recent.value;this.form.submit()')
         .'</form>'          .'</form>'
         .&Apache::lonmenu::constspaceform()          .&Apache::lonmenu::constspaceform()
         .'</div>';          .'</div>';
   
       return $output;
 }  }
   
 ###############################################  ###############################################
Line 4533  sub bodytag { Line 4552  sub bodytag {
             return $bodytag;              return $bodytag;
         }          }
   
         $bodytag .= qq|<div id="LC_nav_bar">$name $role</div>|;          unless ($env{'request.symb'} =~ m/\.page___\d+___/) {
               $bodytag .= qq|<div id="LC_nav_bar">$name $role</div>|;
           }
   
         $bodytag .= Apache::lonhtmlcommon::scripttag(          $bodytag .= Apache::lonhtmlcommon::scripttag(
             Apache::lonmenu::utilityfunctions(), 'start');              Apache::lonmenu::utilityfunctions(), 'start');
Line 4549  sub bodytag { Line 4570  sub bodytag {
         if($env{'user.name'} ne 'public' && $env{'user.domain'} ne 'public'){          if($env{'user.name'} ne 'public' && $env{'user.domain'} ne 'public'){
             $bodytag .= Apache::lonmenu::secondary_menu();              $bodytag .= Apache::lonmenu::secondary_menu();
             $bodytag .= Apache::lonmenu::serverform();              $bodytag .= Apache::lonmenu::serverform();
             $bodytag .= Apache::lonhtmlcommon::scripttag('', 'end');               $bodytag .= Apache::lonhtmlcommon::scripttag('', 'end');
             $bodytag .= Apache::lonmenu::innerregister($forcereg) if $forcereg;              if ($env{'request.state'} eq 'construct') {
                   $bodytag .= &Apache::lonmenu::innerregister($forcereg,'',
                                   $args->{'bread_crumbs'});
               } elsif ($forcereg) { 
                   $bodytag .= &Apache::lonmenu::innerregister($forcereg);
               }
         }else{          }else{
             # this is to seperate menu from content when there's no secondary              # this is to seperate menu from content when there's no secondary
             # menu. Especially needed for public accessible ressources.              # menu. Especially needed for public accessible ressources.
Line 4751  body { Line 4777  body {
   color:$font;    color:$font;
 }  }
   
 a:link,  
 a:visited {  
   font-size:100%;  
 }  
   
 a:focus {  a:focus {
   color: red;    color: red;
   background: yellow;    background: yellow;
Line 4782  form, .inline { Line 4803  form, .inline {
 .LC_filename {  .LC_filename {
   font-family: $mono;    font-family: $mono;
   white-space:pre;    white-space:pre;
     font-size: 120%;
 }  }
   
 .LC_fileicon {  .LC_fileicon {
Line 4872  table.LC_pastsubmission { Line 4894  table.LC_pastsubmission {
   margin: 2px;    margin: 2px;
 }  }
   
 table#LC_top_nav,  table#LC_menubuttons {
 table#LC_menubuttons,  
 table#LC_nav_location {  
   width: 100%;    width: 100%;
   background: $pgbg;    background: $pgbg;
   border: 2px;    border: 2px;
Line 4954  table#LC_menubuttons img { Line 4974  table#LC_menubuttons img {
   border: none;    border: none;
 }  }
   
 table#LC_top_nav td {  
   background: $tabbg;  
   border: none;  
   font-size: small;  
   vertical-align:top;  
   padding:2px 5px 2px 5px;  
 }  
   
 table#LC_top_nav td a,  
 div#LC_top_nav a {  
   color: $font;  
 }  
   
 table#LC_top_nav td.LC_top_nav_logo {  
   background: $tabbg;  
   text-align: left;  
   white-space: nowrap;  
   width: 31px;  
 }  
   
 table#LC_top_nav td.LC_top_nav_logo img {  
   border: none;  
   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 {  
   width: 4.0em;  
   text-align: center;  
 }  
   
 .LC_breadcrumbs_component {  .LC_breadcrumbs_component {
   float: right;    float: right;
   margin: 0 1em;    margin: 0 1em;
Line 5001  td.LC_table_cell_checkbox { Line 4986  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 {
   font-size: 70%;    font-size: 70%;
 }  }
Line 5066  td.LC_menubuttons_text { Line 5047  td.LC_menubuttons_text {
   background: $tabbg;    background: $tabbg;
 }  }
   
 .LC_new_mail {  
   background: $tabbg;  
   font-weight: bold;  
 }  
   
 table.LC_data_table,  table.LC_data_table,
 table.LC_mail_list {  table.LC_mail_list {
   border: 1px solid #000000;    border: 1px solid #000000;
Line 5256  table.LC_mail_list tr.LC_mail_new:hover Line 5232  table.LC_mail_list tr.LC_mail_new:hover
   background-color: $mail_new_hover;    background-color: $mail_new_hover;
 }  }
   
 table.LC_mail_list tr.LC_mail_even {  
 }  
   
 table.LC_mail_list tr.LC_mail_odd {  
 }  
   
 table.LC_mail_list tr.LC_mail_read {  table.LC_mail_list tr.LC_mail_read {
   background-color: $mail_read;    background-color: $mail_read;
 }  }
Line 5554  table.LC_notify_front_page td { Line 5524  table.LC_notify_front_page td {
   font-size: 1.2em;    font-size: 1.2em;
 }  }
   
 .LC_topic_bar img {  
   vertical-align: bottom;  
 }  
   
 table.LC_course_group_status {  table.LC_course_group_status {
   margin: 20px;    margin: 20px;
 }  }
Line 5667  span.LC_prior_string, Line 5633  span.LC_prior_string,
 span.LC_prior_custom,  span.LC_prior_custom,
 span.LC_prior_reaction,  span.LC_prior_reaction,
 span.LC_prior_math {  span.LC_prior_math {
   font-family: monospace;    font-family: $mono;
   white-space: pre;    white-space: pre;
 }  }
   
 span.LC_prior_string {  span.LC_prior_string {
   font-family: monospace;    font-family: $mono;
   white-space: pre;    white-space: pre;
 }  }
   
Line 5705  span.LC_cusr_subheading { Line 5671  span.LC_cusr_subheading {
   font-size: 85%;    font-size: 85%;
 }  }
   
 table.LC_docs_documents {  
   background: #BBBBBB;  
   border-width: 0;  
   border-collapse: collapse;  
 }  
   
 table.LC_docs_documents td.LC_docs_document {  
   border: 2px solid black;  
   padding: 4px;  
 }  
   
 div.LC_docs_entry_move {  div.LC_docs_entry_move {
   border: 1px solid #BBBBBB;    border: 1px solid #BBBBBB;
   background: #DDDDDD;    background: #DDDDDD;
Line 5916  img.stift { Line 5871  img.stift {
   vertical-align: middle;    vertical-align: middle;
 }  }
   
 table#LC_mainmenu {  table td.LC_mainmenu_col_fieldset {
   margin-top:10px;  
   width:80%;  
 }  
   
 table#LC_mainmenu td.LC_mainmenu_col_fieldset {  
   vertical-align: top;    vertical-align: top;
   width: 45%;  
 }  
   
 .LC_mainmenu_fieldset_category {  
   color: $font;  
   background: $pgbg;  
   font-size: small;  
   font-weight: bold;  
 }  }
   
 div.LC_createcourse {  div.LC_createcourse {
Line 5993  h6 { Line 5935  h6 {
   border: 0;    border: 0;
 }  }
   
 .LC_Right {  
   float: right;  
   margin: 0;  
   padding: 0;  
 }  
   
 .LC_FormSectionClearButton input {  .LC_FormSectionClearButton input {
   background-color:transparent;    background-color:transparent;
   border: none;    border: none;
Line 6051  ol.LC_primary_menu { Line 5987  ol.LC_primary_menu {
   margin: 0.2em 0 0 0;    margin: 0.2em 0 0 0;
 }  }
   
   span.LC_new_message{
     font-weight:bold;
     color: darkred;
   }
   
 ol#LC_PathBreadcrumbs {  ol#LC_PathBreadcrumbs {
   margin: 0;    margin: 0;
 }  }
Line 6256  dl.LC_ListStyleClean dd { Line 6197  dl.LC_ListStyleClean dd {
 .LC_ListStyleClean,  .LC_ListStyleClean,
 .LC_ListStyleSimple,  .LC_ListStyleSimple,
 .LC_ListStyleNormal,  .LC_ListStyleNormal,
 .LC_ListStyle_Border,  
 .LC_ListStyleSpecial {  .LC_ListStyleSpecial {
   /* display:block; */    /* display:block; */
   list-style-position: inside;    list-style-position: inside;
Line 6391  table.LC_tableOfContent a { Line 6331  table.LC_tableOfContent a {
   text-decoration: none;    text-decoration: none;
 }  }
   
 table.LC_tableBrowseRes tr.LC_trOdd,  
 table.LC_tableOfContent tr.LC_trOdd {  
   background-color: #EEEEEE;  
 }  
   
 table.LC_tableOfContent img {  table.LC_tableOfContent img {
   border: none;    border: none;
   height: 1.3em;    height: 1.3em;
Line 6770  sub start_page { Line 6705  sub start_page {
     # Don't add anything more if only_body wanted      # Don't add anything more if only_body wanted
     return $result if $args->{'only_body'};      return $result if $args->{'only_body'};
   
       #Breadcrumbs for Construction Space provided by &bodytag. 
       if (($env{'environment.remote'} eq 'off') && ($env{'request.state'} eq 'construct')) {
           return $result;
       }
    
     #Breadcrumbs      #Breadcrumbs
     if (exists($args->{'bread_crumbs'}) or exists($args->{'bread_crumbs_component'})) {      if (exists($args->{'bread_crumbs'}) or exists($args->{'bread_crumbs_component'})) {
  &Apache::lonhtmlcommon::clear_breadcrumbs();   &Apache::lonhtmlcommon::clear_breadcrumbs();
Removed from v.1.919  
changed lines
  Added in v.1.929

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