--- loncom/interface/statistics/lonstathelpers.pm	2005/03/03 17:55:06	1.42
+++ loncom/interface/statistics/lonstathelpers.pm	2005/03/10 16:58:52	1.43
@@ -1,6 +1,6 @@
 # The LearningOnline Network with CAPA
 #
-# $Id: lonstathelpers.pm,v 1.42 2005/03/03 17:55:06 matthew Exp $
+# $Id: lonstathelpers.pm,v 1.43 2005/03/10 16:58:52 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -81,9 +81,8 @@ sub render_resource {
     my ($resource) = @_;
     ##
     ## Render the problem
-    my $base;
-    ($base,undef) = ($resource->{'src'} =~ m|(.*/)[^/]*$|);
-    $base = "http://".$ENV{'SERVER_NAME'}.$base;
+    my ($base) = ($resource->src =~ m|^(.*/)[^/]*$|);
+    $base="http://".$ENV{'SERVER_NAME'}.$base;
     my ($src,$symb)=($resource->src,&Apache::lonnet::escape($resource->symb));
     my $rendered_problem = &Apache::lonnet::ssi_body($src.'?symb='.$symb);
     $rendered_problem =~ s/<\s*form\s*/<nop /g;