--- loncom/lonnet/perl/lonnet.pm	2002/08/30 20:32:21	1.277
+++ loncom/lonnet/perl/lonnet.pm	2002/09/05 19:37:00	1.278
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # TCP networking package
 #
-# $Id: lonnet.pm,v 1.277 2002/08/30 20:32:21 albertel Exp $
+# $Id: lonnet.pm,v 1.278 2002/09/05 19:37:00 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2341,6 +2341,7 @@ sub createcourse {
     unless ($nonstandard) {
 # ------------------------------------------ For standard courses, make top url
         my $mapurl=&clutter($url);
+        if ($mapurl eq '/res/') { $mapurl=''; }
         $ENV{'form.initmap'}=(<<ENDINITMAP);
 <map>
 <resource id="1" type="start"></resource>