--- loncom/interface/lonprintout.pm	2002/12/23 19:11:33	1.100
+++ loncom/interface/lonprintout.pm	2003/01/06 15:19:21	1.101
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.100 2002/12/23 19:11:33 albertel Exp $
+# $Id: lonprintout.pm,v 1.101 2003/01/06 15:19:21 sakharuk Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -153,9 +153,11 @@ ENDMENUOUT5
 
 sub sequence_content_menu {
     my ($key_to,$r) = @_;
+    my $primary_sequence;
     my $symbolic = &Apache::lonnet::symbread($ENV{'form.url'});
     my @sequence = split('___',$symbolic);
-    my $primary_sequence = '/res/'.$sequence[0];   
+    if ($sequence[0]=~/^uploaded/) {$primary_sequence = '/'.$sequence[0];} 
+      else {$primary_sequence = '/res/'.$sequence[0];} 
     my @master_seq = &coming_from_hash($primary_sequence,$sequence[0]);
     my @master_seq_view = @master_seq;
     for (my $i=0;$i<=$#master_seq_view;$i++) {
@@ -1187,6 +1189,7 @@ sub character_chart {
 
 sub page_format_transformation {
 	my ($papersize,$layout,$numberofcolumns,$choice,$text,$assignment) = @_; 
+	$assignment=~s/_/ /g;
 	my ($textwidth,$textheight,$oddoffset,$evenoffset) = &page_format($papersize,$layout,$numberofcolumns);
 	my $courseidinfo = $ENV{'course.'.$ENV{'request.course.id'}.'.description'};	
 	if ($layout eq 'CBI') {