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

raeburn raeburn at source.lon-capa.org
Sat Jan 18 19:24:30 EST 2020


raeburn		Sun Jan 19 00:24:30 2020 EDT

  Modified files:              (Branch: version_2_11_X)
    /loncom/interface	lonmenu.pm 
  Log:
  - For 2.11
    Backport part of 1.480 omitted from 1.369.2.73, 1.496 (part)
  
  
Index: loncom/interface/lonmenu.pm
diff -u loncom/interface/lonmenu.pm:1.369.2.78 loncom/interface/lonmenu.pm:1.369.2.79
--- loncom/interface/lonmenu.pm:1.369.2.78	Sat Aug 17 12:58:00 2019
+++ loncom/interface/lonmenu.pm	Sun Jan 19 00:24:30 2020
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Routines to control the menu
 #
-# $Id: lonmenu.pm,v 1.369.2.78 2019/08/17 12:58:00 raeburn Exp $
+# $Id: lonmenu.pm,v 1.369.2.79 2020/01/19 00:24:30 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1707,7 +1707,7 @@
         &advtools_crumbs(@inlineremote);
         return $editbutton;
     } elsif (($env{'request.registered'}) && (!ref($forbodytag))) {
-        return $editbutton;
+        return $editbutton || $viewsrcbutton;
     } else {
         if (ref($bread_crumbs) eq 'ARRAY') {
             if (@inlineremote > 0) {
@@ -2382,6 +2382,11 @@
    newWin.focus();
 }
 
+function open_source() {
+   sourcewin=window.open('/adm/source?inhibitmenu=yes&viewonly=1&filename='+currentURL,'LONsource',
+                         'height=500,width=600,resizable=yes,location=no,menubar=no,toolbar=no,scrollbars=yes');
+}
+
 (function (\$) {
   \$(document).ready(function () {
     \$.single=function(a){return function(b){a[0]=b;return a}}(\$([1]));




More information about the LON-CAPA-cvs mailing list