[LON-CAPA-cvs] cvs: loncom /interface lonmenu.pm lonparmset.pm mydesk.tab

www lon-capa-cvs@mail.lon-capa.org
Wed, 08 Jun 2005 02:14:31 -0000


www		Tue Jun  7 22:14:31 2005 EDT

  Modified files:              
    /loncom/interface	lonmenu.pm lonparmset.pm mydesk.tab 
  Log:
  * What's New button in Remote
  * Different buttons on Set Overview mode
  
  
Index: loncom/interface/lonmenu.pm
diff -u loncom/interface/lonmenu.pm:1.153 loncom/interface/lonmenu.pm:1.154
--- loncom/interface/lonmenu.pm:1.153	Sun Jun  5 22:29:46 2005
+++ loncom/interface/lonmenu.pm	Tue Jun  7 22:14:29 2005
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Routines to control the menu
 #
-# $Id: lonmenu.pm,v 1.153 2005/06/06 02:29:46 albertel Exp $
+# $Id: lonmenu.pm,v 1.154 2005/06/08 02:14:29 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -345,15 +345,14 @@
         my $hwkadd='';
         if ($env{'request.symb'} ne '' &&
 	    $env{'request.filename'}=~/\.(problem|exam|quiz|assess|survey|form)$/) {
-	    if (&Apache::lonnet::allowed('vgr',$crs)) {
-		$hwkadd.=&switch('','',7,1,'subm.gif','view sub-[_1]','missions[_1]',
-                       "gocmd('/adm/grades','submission')",
-		       'View user submissions for this assessment resource');
-            }
 	    if (&Apache::lonnet::allowed('mgr',$crs)) {
 		$hwkadd.=&switch('','',7,2,'pgrd.gif','problem[_1]','grades[_3]',
                        "gocmd('/adm/grades','gradingmenu')",
                        'Modify user grades for this assessment resource');
+            } elsif (&Apache::lonnet::allowed('vgr',$crs)) {
+		$hwkadd.=&switch('','',7,2,'subm.gif','view sub-[_1]','missions[_1]',
+                       "gocmd('/adm/grades','submission')",
+		       'View user submissions for this assessment resource');
             }
 	}
 	if ($env{'request.symb'} ne '' &&
@@ -545,7 +544,6 @@
              swmenu.switchbutton
              (3,1,'reload.gif','return','location','go(reloadURL)','Return to the last known location in the course sequence');
 	  }
-          swmenu.clearbut(7,1);
           swmenu.clearbut(7,2);
           swmenu.clearbut(7,3);
           swmenu.menucltim=swmenu.setTimeout(
Index: loncom/interface/lonparmset.pm
diff -u loncom/interface/lonparmset.pm:1.217 loncom/interface/lonparmset.pm:1.218
--- loncom/interface/lonparmset.pm:1.217	Tue Jun  7 11:21:03 2005
+++ loncom/interface/lonparmset.pm	Tue Jun  7 22:14:29 2005
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to set parameters for assessments
 #
-# $Id: lonparmset.pm,v 1.217 2005/06/07 15:21:03 albertel Exp $
+# $Id: lonparmset.pm,v 1.218 2005/06/08 02:14:29 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -776,8 +776,18 @@
 	checkthis('duedate','pscat');
  	checkthis('opendate','pscat');
 	checkthis('answerdate','pscat');
-	checkthis('interval','pscat');
-   }
+    }
+
+    function checkdisset() {
+	checkthis('discussend','pscat');
+ 	checkthis('discusshide','pscat');
+    }
+
+    function checkcontdates() {
+	checkthis('contentopen','pscat');
+ 	checkthis('contentclose','pscat');
+    }
+ 
 
     function checkvisi() {
 	checkthis('hiddenresource','pscat');
@@ -820,12 +830,14 @@
     }
     $r->print('
 </tr><tr><td>
-<a href="javascript:checkall(true, \'pscat\')">Select All</a>
-<a href="javascript:checkstandard()">Select Standard</a>
+<a href="javascript:checkall(true, \'pscat\')">Select All</a><br />
+<a href="javascript:checkstandard()">Select Common Only</a>
 </td><td>
-<a href="javascript:checkdates()">Select Dates</a>
-<a href="javascript:checkvisi()">Select Visibilities</a>
-<a href="javascript:checkparts()">Select Part Parameters</a>
+<a href="javascript:checkdates()">Add Problem Dates</a>
+<a href="javascript:checkcontdates()">Add Content Dates</a><br />
+<a href="javascript:checkdisset()">Add Discussion Settings</a>
+<a href="javascript:checkvisi()">Add Visibilities</a><br />
+<a href="javascript:checkparts()">Add Part Parameters</a>
 </td><td>
 <a href="javascript:checkall(false, \'pscat\')">Unselect All</a>
 </td>
@@ -1004,7 +1016,9 @@
 	    'parameter_0_ordered' => 15,
 	    'parameter_0_tol' => 16,
 	    'parameter_0_sig' => 17,
-	    'parameter_0_turnoffunit' => 18);
+	    'parameter_0_turnoffunit' => 18,
+            'parameter_0_discussend' => 19,
+            'parameter_0_discusshide' => 20);
 }
 
 ##################################################
Index: loncom/interface/mydesk.tab
diff -u loncom/interface/mydesk.tab:1.62 loncom/interface/mydesk.tab:1.63
--- loncom/interface/mydesk.tab:1.62	Thu Jun  2 08:49:18 2005
+++ loncom/interface/mydesk.tab	Tue Jun  7 22:14:29 2005
@@ -43,8 +43,7 @@
 5:3:clear
 5:3:pccc:$requested_domain:ccrs.gif:create[_1]:course[_8]:go('/adm/createcourse');:Create a new course
 5:3:popa:$crs:parm.gif:course[_9]:parms[_1]:go('/adm/parmset');:Set deadlines and other assessment parameters, as well as modify course environment
-#6:1:clear
-6:1:smp:any:port.gif:port-[_1]:folio[_1]:go('/adm/portfolio');:Enter my portfolio space
+6:1:any:any:port.gif:port-[_1]:folio[_1]:go('/adm/portfolio');:Enter my portfolio space
 6:1:author:rau:cstr.gif:con-[_1]:struct[_1]:go('/priv/$uname/');:Enter my resource construction space
 6:1:author:rca:cstr.gif:co con-[_1]:struct[_2]:go('/priv/$caname/');:Enter construction space as a co-author
 6:2:clear
@@ -53,6 +52,8 @@
 6:2:author:rca:res.gif:co res[_1]:space[_2]:go('/res/$udom/$uname/?launch=1');:Browse published resources
 6:3:clear
 6:3:pccc:$requested_domain:mcrs.gif:modify:course:go('/adm/modifycourse');:Modify course settings
+7:1:clear
+7:1:pgan:$crs:new.gif:what is[_1]:new[_2]:go('/adm/whatsnew');:What's new?
 7:2:clear
 7:2:adv:rcm:egrd.gif:enter[_1]:grades[_2]:go('/adm/grades');:Enter grades from check-out assessment resources
 7:2:pusc:$requested_domain:sctr.gif:send[_1]:scantron[_1]:gocmd('/adm/grades','scantronupload');:Send Scantron data to a course