--- rat/lonpage.pm	2004/12/10 19:29:19	1.63
+++ rat/lonpage.pm	2004/12/17 22:34:53	1.66
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Page Handler
 #
-# $Id: lonpage.pm,v 1.63 2004/12/10 19:29:19 albertel Exp $
+# $Id: lonpage.pm,v 1.66 2004/12/17 22:34:53 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -241,8 +241,12 @@ sub handler {
 			      &Apache::loncommon::fileembstyle($extension);
                           if ($cellemb{$_} eq 'ssi') {
 # --------------------------------------------------------- This is an SSI cell
+			      my ($mapid,$resid)=split(/\./,$_);
+			      my $symb=&Apache::lonnet::encode_symb($hash{'map_id_'.$mapid},$resid,$src);
+			      
 			      my $prefix=$_.'_';
-                              my %posthash=('request.prefix' => $prefix);
+                              my %posthash=('request.prefix' => $prefix,
+					    'symb' => $symb);
 			      if ($ENV{'form.grade_target'} eq 'tex') {
 				  $posthash{'grade_target'}=$ENV{'form.grade_target'};
 				  $posthash{'textwidth'}=$ENV{'form.textwidth'};
@@ -430,11 +434,14 @@ sub handler {
                               my $rid=$colcont[$j];
                               my $metainfo = '';
 			      my $esrc=&Apache::lonnet::declutter($hash{'src_'.$rid});
+			      my ($mapid,$resid)=split(/\./,$rid);
+			      my $symb=&Apache::lonnet::encode_symb($hash{'map_id_'.$mapid},$resid,$hash{'src_'.$rid});
 			      if ($hash{'encrypted_'.$rid}) {
+				  $symb=&Apache::lonenc::encrypted($symb);
 				  $esrc=&Apache::lonenc::encrypted($esrc);
 			      }
                               unless ($hash{'src_'.$rid} =~ m-^/uploaded/-) { 
-                                  $metainfo ='<a name="'.&Apache::lonnet::escape($esrc).'" />'.
+                                  $metainfo ='<a name="'.&Apache::lonnet::escape($symb).'" />'.
                                   '<a href="'.$metalink{$rid}.'" target="LONcatInfo">'.
                                   '<img src="/adm/lonMisc/cat_button.gif" border=0>'.
                                   '</img></a>';
@@ -551,6 +558,7 @@ sub handler {
 		      } else {
 			  $r->print('\end{document}'.$number_of_columns);
 		      }
+		      &Apache::lonnet::symblist($requrl,%symbhash);
 # -------------------------------------------------------------------- End page
                   }                  
 # ------------------------------------------------------------- End render page