[LON-CAPA-cvs] cvs: loncom(version_2_1_X) /interface lonwhatsnew.pm

[albertel]

albertel		Mon Dec 19 18:24:40 2005 EDT

  Modified files:              (Branch: version_2_1_X)
    /loncom/interface	lonwhatsnew.pm 
  Log:
  - backport bugfix from 1.39
  
  
Index: loncom/interface/lonwhatsnew.pm
diff -u loncom/interface/lonwhatsnew.pm:1.38 loncom/interface/lonwhatsnew.pm:1.38.2.1
--- loncom/interface/lonwhatsnew.pm:1.38	Thu Dec 15 08:38:58 2005
+++ loncom/interface/lonwhatsnew.pm	Mon Dec 19 18:24:40 2005
@@ -1,5 +1,5 @@
 #
-# $Id: lonwhatsnew.pm,v 1.38 2005/12/15 13:38:58 raeburn Exp $
+# $Id: lonwhatsnew.pm,v 1.38.2.1 2005/12/19 23:24:40 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -171,7 +171,10 @@
 function changeAll(change) {
 END
         foreach my $item (keys(%{$checkallowed})) {
-            $scripttag.='document.visible.display_'.$item.'.value=change'."\n";
+            if ($$checkallowed{$item}) {
+                $scripttag.='document.visible.display_'.$item.'.value=change'.
+                            "\n";
+            }
         }
         $scripttag.='document.visible.submit();
 }