--- loncom/publisher/lonpublisher.pm	2002/02/14 22:01:39	1.73
+++ loncom/publisher/lonpublisher.pm	2002/03/06 22:58:45	1.74
@@ -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.74 2002/03/06 22:58:45 albertel 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;
 		      }