--- loncom/interface/lonprintout.pm	2012/11/20 12:01:54	1.621
+++ 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.621 2012/11/20 12:01:54 foxr 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,7 +2606,6 @@ sub print_construction_sequence {
 #  For item 100, filtering was done at the helper level.
 
 sub output_data {
-    &Apache::lonnet::logthis("outptu_data");
 
     my ($r,$helper,$rparmhash) = @_;
     my %parmhash = %$rparmhash;
@@ -2880,8 +2880,6 @@ ENDPART
 	     ($print_type eq 'select_sequences')      or
 	     ($print_type eq 'map_incomplete_problems_seq')
 	     ) {
-	&Apache::lonnet::logthis("map_problems maybe");
-	&Apache::lonnet::logthis($print_type eq 'map_problems' ? " Yes" : "No");
  
         #-- produce an output string
 	if (($print_type eq 'map_problems')                or
@@ -3802,7 +3800,6 @@ sub handler {
     }
     
     &init_perm();
-    &Apache::lonnet::logthis("Handler");
     my $helper = printHelper($r);
     if (!ref($helper)) {
 	return $helper;