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

[albertel]

albertel		Thu Dec 29 12:58:14 2005 EDT

  Modified files:              
    /loncom/interface	lonparmset.pm 
  Log:
  - bug #4529 parmset was getting oncorrect titles sometimes since was using the url not the symb
  
  
Index: loncom/interface/lonparmset.pm
diff -u loncom/interface/lonparmset.pm:1.273 loncom/interface/lonparmset.pm:1.274
--- loncom/interface/lonparmset.pm:1.273	Thu Dec 29 09:59:58 2005
+++ loncom/interface/lonparmset.pm	Thu Dec 29 12:58:13 2005
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to set parameters for assessments
 #
-# $Id: lonparmset.pm,v 1.273 2005/12/29 14:59:58 www Exp $
+# $Id: lonparmset.pm,v 1.274 2005/12/29 17:58:13 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1605,14 +1605,15 @@
                     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");