--- loncom/interface/lonprintout.pm	2003/08/01 19:22:47	1.207
+++ loncom/interface/lonprintout.pm	2003/08/02 13:57:05	1.208
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.207 2003/08/01 19:22:47 sakharuk Exp $
+# $Id: lonprintout.pm,v 1.208 2003/08/02 13:57:05 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -958,8 +958,7 @@ sub printHelper {
     # This will persistently load in the data we want from the
     # very first screen.
     # Detect whether we're coming from construction space
-    if ($ENV{'form.postdata'} =~ /http:\/\// ) {
-        $ENV{'form.postdata'} =~ /http:\/\/[^\/]+\/~([^\/]+)\/(.*)/;
+    if ($ENV{'form.postdata'}=~/^(?:http:\/\/[^\/]+\/|\/|)\~([^\/]+)\/(.*)$/) {
         $helper->{VARS}->{'filename'} = "/home/$1/public_html/$2";
         $helper->{VARS}->{'construction'} = 1;
     } else {