--- rat/lonratedt.pm	2002/06/24 14:12:04	1.31
+++ rat/lonratedt.pm	2002/09/04 19:11:24	1.31.2.2
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Edit Handler for RAT Maps
 #
-# $Id: lonratedt.pm,v 1.31 2002/06/24 14:12:04 www Exp $
+# $Id: lonratedt.pm,v 1.31.2.2 2002/09/04 19:11:24 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -38,8 +38,7 @@ use Apache::lonnet;
 use Apache::lonratsrv;
 use Apache::lonsequence;
 
-my @order;
-my @resources;
+use vars qw(@order @resources);
 
 
 # Mapread read maps into global arrays @links and @resources, determines status
@@ -318,6 +317,10 @@ sub startfinish {
     }
    my ($name,$url,$ext)=split(/\:/,$resources[$order[0]]);
    $resources[$order[0]]=$name.':'.$url.':'.$ext.':start:res';
+   if ($#order==0) {
+       $resources[$#resources+1]='::false';
+       $order[1]=$#resources;
+   }
    my ($name,$url,$ext)=split(/\:/,$resources[$order[$#order]]);
    $resources[$order[$#order]]=$name.':'.$url.':'.$ext.':finish:res';
 }
@@ -544,6 +547,8 @@ sub smpedt {
 # ------------------------------------------------------------ Assemble windows
    
    my $idx=-1;
+   $importdetail='&'.$importdetail;
+   $importdetail=~s/^\&+/\&/;
    my $importwindow=
        '<option value="-1"> ---- Import and Paste Area ---- </option>'.
      join("\n",map {