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

raeburn raeburn at source.lon-capa.org
Sun May 13 15:11:14 EDT 2012


raeburn		Sun May 13 19:11:14 2012 EDT

  Modified files:              (Branch: version_2_11_X)
    /loncom/interface	lonpreferences.pm 
  Log:
  - For 2.11.
    - Reverse part of changes in 1.185, as Remote Control is retained in 2.11.0
  
  
Index: loncom/interface/lonpreferences.pm
diff -u loncom/interface/lonpreferences.pm:1.196.4.1 loncom/interface/lonpreferences.pm:1.196.4.2
--- loncom/interface/lonpreferences.pm:1.196.4.1	Thu May 10 18:00:24 2012
+++ loncom/interface/lonpreferences.pm	Sun May 13 19:11:13 2012
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Preferences
 #
-# $Id: lonpreferences.pm,v 1.196.4.1 2012/05/10 18:00:24 raeburn Exp $
+# $Id: lonpreferences.pm,v 1.196.4.2 2012/05/13 19:11:13 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2091,6 +2091,25 @@
 	linktitle => 'Change your password.',
 	});
     }
+    if ($env{'environment.remote'} eq 'off') {
+push(@{ $menu[1]->{items} }, {
+        linktext => 'Launch Remote Control',
+        url => '/adm/remote?url=/adm/preferences&action=launch',
+        permission => 'F',
+        #help => '',
+        icon => 'remotecontrol.png',
+        linktitle => 'Launch the remote control for LON-CAPA.',
+        });
+    }else{
+push(@{ $menu[1]->{items} }, {
+        linktext => 'Collapse Remote Control',
+        url => '/adm/remote?url=/adm/preferences&action=collapse',
+        permission => 'F',
+        #help => '',
+        icon => 'remotecontrol.png',
+        linktitle => 'Collapse the remote control for LON-CAPA.',
+        });
+    }
 
     if (&can_toggle_namelocking()) {
         push(@{ $menu[0]->{items} }, {




More information about the LON-CAPA-cvs mailing list