--- loncom/publisher/lonpublisher.pm	2001/08/13 16:12:59	1.38
+++ loncom/publisher/lonpublisher.pm	2001/08/17 16:27:08	1.39
@@ -11,7 +11,7 @@
 # 04/16/2001 Scott Harrison
 # 05/03,05/05,05/07 Gerd Kortemeyer
 # 05/28/2001 Scott Harrison
-# 06/23,08/07,08/11,8/13 Gerd Kortemeyer
+# 06/23,08/07,08/11,8/13,8/17 Gerd Kortemeyer
 
 package Apache::lonpublisher;
 
@@ -135,6 +135,7 @@ sub selectbox {
 
 sub urlfixup {
     my ($url,$target)=@_;
+    unless ($url) { return ''; }
     my ($host)=($url=~/(?:http\:\/\/)*([^\/]+)/);
     map {
 	if ($_ eq $host) {