--- loncom/interface/lonprintout.pm	2012/10/12 13:48:08	1.620
+++ loncom/interface/lonprintout.pm	2012/11/30 20:38:01	1.623
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.620 2012/10/12 13:48:08 raeburn Exp $
+# $Id: lonprintout.pm,v 1.623 2012/11/30 20:38:01 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2060,6 +2060,7 @@ sub unsupported {
     my $result.= &print_latex_header($mode);
     if ($currentURL=~m|^(/adm/wrapper/)?ext/|) {
 	$currentURL=~s|^(/adm/wrapper/)?ext/|http://|;
+        $currentURL=~s|^http://https://|https://|;
 	my $title=&Apache::lonnet::gettitle($symb);
 	$title = &Apache::lonxml::latex_special_symbols($title);
 	$result.=' \strut \\\\ '.$title.' \strut \\\\ '.$currentURL.' ';
@@ -2605,6 +2606,7 @@ sub print_construction_sequence {
 #  For item 100, filtering was done at the helper level.
 
 sub output_data {
+
     my ($r,$helper,$rparmhash) = @_;
     my %parmhash = %$rparmhash;
     $ssi_error = 0;		# This will be set nonzero by failing ssi's.
@@ -2878,7 +2880,6 @@ ENDPART
 	     ($print_type eq 'select_sequences')      or
 	     ($print_type eq 'map_incomplete_problems_seq')
 	     ) {
-
  
         #-- produce an output string
 	if (($print_type eq 'map_problems')                or
@@ -3533,7 +3534,6 @@ sub print_resources {
     my $namepostfix = "\\\\";	# Both anon and not anon should get the same vspace.
 
 
-
     #
     # Figure out if we need to filter the output by
     # the incomplete problems for that person
@@ -3800,7 +3800,6 @@ sub handler {
     }
     
     &init_perm();
-
     my $helper = printHelper($r);
     if (!ref($helper)) {
 	return $helper;
@@ -4219,7 +4218,7 @@ sub printHelper {
 							    'RESOURCES',
 							    'PAGESIZE',
 							    $map,
-							    !							$isProblem, '',
+							    $isProblem, '',
 							    $symbFilter,
 							    $start_new_option);
 	    $helperFragment .= &generate_resource_chooser('CHOOSE_PROBLEMS_HTML',