--- loncom/publisher/lonpublisher.pm	2002/02/14 22:01:39	1.73
+++ loncom/publisher/lonpublisher.pm	2002/03/25 17:09:21	1.75
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Publication Handler
 #
-# $Id: lonpublisher.pm,v 1.73 2002/02/14 22:01:39 albertel Exp $
+# $Id: lonpublisher.pm,v 1.75 2002/03/25 17:09:21 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -326,7 +326,12 @@ sub publish {
 				  print $logfile 'URL: '.$tag.':'.$oldurl.' - '.
 				      $newurl."\n";
 			      }
-			      $allow{&absoluteurl($newurl,$target)}=1;
+			      if (($newurl !~ /^javascript:/i) &&
+				  ($newurl !~ /^mailto:/i) &&
+				  ($newurl !~ /^http:/i) &&
+				  ($newurl !~ /^\#/)) {
+				  $allow{&absoluteurl($newurl,$target)}=1;
+			      }
 			  }
 			  last;
 		      }
@@ -942,7 +947,7 @@ if (-e $target) {
 
 
     return $warning.$scrout.
-      '<hr><a href="'.$thisdistarget.'"><font size=+2>View Target</font></a>'.
+      '<hr><a href="'.$thisdistarget.'"><font size=+2>View Published Version</font></a>'.
       '<p><a href="'.$thissrc.'"><font size=+2>Back to Source</font></a>'.
       '<p><a href="'.$thissrcdir.
       '"><font size=+2>Back to Source Directory</font></a>';