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

[raeburn]

raeburn		Tue Aug  7 01:35:47 2012 EDT

  Modified files:              (Branch: version_2_11_X)
    /loncom/interface	lonmenu.pm 
  Log:
  - For 2.11.
    - Do not show ALNK (Add Stored Link) button or PRT (Printout) button on
      Remote Control unless resource being displayed is suitable for each action.
  
  
Index: loncom/interface/lonmenu.pm
diff -u loncom/interface/lonmenu.pm:1.369.2.19 loncom/interface/lonmenu.pm:1.369.2.20
--- loncom/interface/lonmenu.pm:1.369.2.19	Mon Aug  6 03:38:08 2012
+++ loncom/interface/lonmenu.pm	Tue Aug  7 01:35:47 2012
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Routines to control the menu
 #
-# $Id: lonmenu.pm,v 1.369.2.19 2012/08/06 03:38:08 raeburn Exp $
+# $Id: lonmenu.pm,v 1.369.2.20 2012/08/07 01:35:47 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -863,6 +863,16 @@
                 }
             }
 	}
+        unless ($got_prt) {
+            $menuitems .= (<<ENDMENUITEMS);
+c&8&3
+ENDMENUITEMS
+        }
+        unless ($got_wishlist) {
+            $menuitems .= (<<ENDMENUITEMS);
+c&9&1
+ENDMENUITEMS
+        }
         my $buttons='';
         foreach (split(/\n/,$menuitems)) {
 	    my ($command, at rest)=split(/\&/,$_);
@@ -992,6 +1002,7 @@
           swmenu.clearbut(8,1);
           swmenu.clearbut(8,2);
           swmenu.clearbut(8,3);
+          swmenu.clearbut(9,1);
           if (swmenu.currentURL) {
              swmenu.switchbutton
               (3,1,'reload.gif','return','location','go(currentURL)');