--- loncom/interface/lonparmset.pm	2004/11/27 17:23:09	1.179
+++ loncom/interface/lonparmset.pm	2005/02/02 19:23:59	1.181
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to set parameters for assessments
 #
-# $Id: lonparmset.pm,v 1.179 2004/11/27 17:23:09 raeburn Exp $
+# $Id: lonparmset.pm,v 1.181 2005/02/02 19:23:59 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -628,13 +628,10 @@ sub extractResourceInformation {
 		if ($mapid eq '1') {
 		    $$maptitles{$mapid}='Main Course Documents';
 		} else {
-		    $$maptitles{$mapid}=
-			$$bighash{'title_'.$$bighash{'ids_'.&Apache::lonnet::clutter($$mapp{$id})}};
+		    $$maptitles{$mapid}=&Apache::lonnet::gettitle(&Apache::lonnet::clutter($$mapp{$id}));
 		}
 		$$maptitles{$$mapp{$id}}=$$maptitles{$mapid};
-		$$symbp{$id}=$$mapp{$id}.
-			'___'.$resid.'___'.
-			    &Apache::lonnet::declutter($srcf);
+		$$symbp{$id}=&Apache::lonnet::encode_symb($$mapp{$id},$resid,$srcf);
                 $$symbp{$mapid}=$$mapp{$id}.'___(all)';
 	    }
 	}
@@ -1219,8 +1216,7 @@ ENDTABLEHEADFOUR
                     my $totalparms=scalar keys %name;
                     if ($totalparms>0) {
                         my $firstrow=1;
-			my $title=$bighash{'title_'.$rid};
-			$title=~s/\:/:/g;
+			my $title=&Apache::lonnet::gettitle($uri);
                         $r->print('<tr><td bgcolor='.$defbgone.
                              ' rowspan='.$totalparms.
                              '><tt><font size=-1>'.