--- loncom/interface/lonparmset.pm	2005/11/22 19:02:40	1.268.2.1
+++ loncom/interface/lonparmset.pm	2006/06/19 09:38:16	1.268.2.5
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to set parameters for assessments
 #
-# $Id: lonparmset.pm,v 1.268.2.1 2005/11/22 19:02:40 albertel Exp $
+# $Id: lonparmset.pm,v 1.268.2.5 2006/06/19 09:38:16 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -126,6 +126,7 @@ sub parmval_by_symb {
     my @outpar=();
 # ----------------------------------------------------- Cascading lookup scheme
     my $map=(&Apache::lonnet::decode_symb($symb))[0];    
+    $map = &Apache::lonnet::deversion($map);
 
     my $symbparm=$symb.'.'.$what;
     my $mapparm=$map.'___(all).'.$what;
@@ -363,6 +364,8 @@ sub storeparm_by_symb_inner {
 # ---------------------------------------------------------- Construct prefixes
     $spnam=~s/\_([^\_]+)$/\.$1/;
     my $map=(&Apache::lonnet::decode_symb($symb))[0];    
+    $map = &Apache::lonnet::deversion($map);
+
     my $symbparm=$symb.'.'.$spnam;
     my $mapparm=$map.'___(all).'.$spnam;
 
@@ -1458,14 +1461,15 @@ ENDTABLEHEADFOUR
                     my $totalparms=scalar keys %name;
                     if ($totalparms>0) {
                         my $firstrow=1;
-			my $title=&Apache::lonnet::gettitle($uri);
+			my $title=&Apache::lonnet::gettitle($symbp{$rid});
                         $r->print('<tr><td bgcolor='.$defbgone.
                              ' rowspan='.$totalparms.
                              '><tt><font size=-1>'.
                              join(' / ',split(/\//,$uri)).
                              '</font></tt><p><b>'.
                              "<a href=\"javascript:openWindow('".
-				  &Apache::lonnet::clutter($uri).
+				  &Apache::lonnet::clutter($uri).'?symb='.
+				  &Apache::lonnet::escape($symbp{$rid}).
                              "', 'metadatafile', '450', '500', 'no', 'yes')\";".
                              " TARGET=_self>$title");
 
@@ -1893,8 +1897,8 @@ sub crsenv {
 	         => '<b>'.&mt('Receipt algorithm used').'</b> <br />'.
                     &mt('This controls how receipt numbers are generated.'),
              'suppress_tries'
-                 => '<b>'.&mt('Suppress number of tries in printing').'</b>('.
-                    &mt('yes if supress').')',
+                 => '<b>'.&mt('Suppress number of tries in printing').'</b><br />'.
+                    ' ('.&mt('"[_1]" to suppress, anything else to not suppress','<tt>yes</tt>').')',
              'problem_stream_switch'
                  => '<b>'.&mt('Allow problems to be split over pages').'</b><br />'.
                     ' ('.&mt('"[_1]" if allowed, anything else if not','<tt>yes</tt>').')',
@@ -1914,6 +1918,8 @@ sub crsenv {
              'disable_receipt_display'
                  => '<b>'.&mt('Disable display of problem receipts').'</b><br />'.
                     ' ('.&mt('"[_1]" to disable, anything else if not','<tt>yes</tt>').')',
+	     'task_messages'
+	         => '<b>'.&mt('Send message to student when clicking Done on Tasks. [_1] to send a message only to student, [_2] to send message to student and add record to user information page for instructors. Leave blank to disable.','<tt>only_student</tt>','<tt>student_and_user_notes_screen</tt>').'</b>',
 	     'disablesigfigs'
 	         => '<b>'.&mt('Disable checking of Significant Figures').'</b><br />'.
                     ' ('.&mt('"[_1]" to disable, anything else if not','<tt>yes</tt>').')',
@@ -1947,7 +1953,8 @@ sub crsenv {
                              'default_enrollment_end_date',
 			     'tthoptions',
 			     'disablesigfigs',
-			     'disableexampointprint'
+			     'disableexampointprint',
+			     'task_messages'
                              );
 	foreach my $parameter (sort(keys(%values))) {
             unless (($parameter =~ m/^internal\./)||($parameter =~ m/^metadata\./)) {
@@ -2704,7 +2711,7 @@ ENDMAINFORMHEAD
 	    action => 'setrestrictmeta',
             permission => $parm_permission,
             },
-	  { text => 'Manange Course Slots',
+	  { text => 'Manage Course Slots',
 	    url => '/adm/slotrequest?command=showslots',
 	    permission => $vgr,
             },