[LON-CAPA-cvs] cvs: loncom(version_2_11_X) /interface lonindexer.pm

raeburn raeburn at source.lon-capa.org
Thu Sep 3 11:49:27 EDT 2020


raeburn		Thu Sep  3 15:49:27 2020 EDT

  Modified files:              (Branch: version_2_11_X)
    /loncom/interface	lonindexer.pm 
  Log:
  - For 2.11
    Backport 1.226, 1.230
  
  
Index: loncom/interface/lonindexer.pm
diff -u loncom/interface/lonindexer.pm:1.213.4.8 loncom/interface/lonindexer.pm:1.213.4.9
--- loncom/interface/lonindexer.pm:1.213.4.8	Fri Jan 23 22:59:28 2015
+++ loncom/interface/lonindexer.pm	Thu Sep  3 15:49:27 2020
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Directory Indexer
 #
-# $Id: lonindexer.pm,v 1.213.4.8 2015/01/23 22:59:28 raeburn Exp $
+# $Id: lonindexer.pm,v 1.213.4.9 2020/09/03 15:49:27 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -565,7 +565,7 @@
 	    } else {
 		$r->print($reshome);
 	    }
-	    $r->print("'>".&mt('Home').'</a></span>');
+	    $r->print("'>".&mt('Home directory').'</a></span>');
 	}
 	$r->print('</form>');
 # ------------------------------------------------------ Remember where we were
@@ -1088,8 +1088,13 @@
 	my $quotable_filelink = &Apache::loncommon::escape_single($filelink);
         my $quotable_startdir = Apache::loncommon::escape_single($startdir);
         my $quotable_listname = &Apache::loncommon::escape_single($listname);
+        my $curfext = lc((split(/\./,$listname))[-1]);
+        my $modalstyle;
+        if ($curfext =~ /^js|css|txt|tab$/) {
+            $modalstyle = ",'','background-color:#ffffff'";
+        }
 
-	$r->print (" <a href=\"javascript:openMyModal('".$quotable_filelink."?inhibitmenu=yes',500,500,'yes');\">$listname</a> ");
+	$r->print (" <a href=\"javascript:openMyModal('".$quotable_filelink."?inhibitmenu=yes',500,500,'yes'".$modalstyle.");\">$listname</a> ");
 	$quotable_filelink = &Apache::loncommon::escape_single($filelink.'.meta');
 	&Apache::loncommon::inhibit_menu_check(\$quotable_filelink);
 	$r->print (" (<a href=\"javascript:openMyModal('".$quotable_filelink."?inhibitmenu=yes',500,500,'yes');\">".&mt('metadata')."</a>) ");




More information about the LON-CAPA-cvs mailing list