--- loncom/publisher/lonpublisher.pm	2001/12/25 21:58:54	1.67
+++ loncom/publisher/lonpublisher.pm	2002/01/08 21:14:53	1.68
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Publication Handler
 #
-# $Id: lonpublisher.pm,v 1.67 2001/12/25 21:58:54 www Exp $
+# $Id: lonpublisher.pm,v 1.68 2002/01/08 21:14:53 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -185,6 +185,10 @@ sub selectbox {
 sub urlfixup {
     my ($url,$target)=@_;
     unless ($url) { return ''; }
+    #javascript code needs no fixing
+    if ($url =~ /^javascript:/i) { return $url; }
+    #internal document links need no fixing
+    if ($url =~ /^\#/) { return $url; } 
     my ($host)=($url=~/(?:http\:\/\/)*([^\/]+)/);
     foreach (values %Apache::lonnet::hostname) {
 	if ($_ eq $host) {