--- loncom/interface/Attic/lonspreadsheet.pm	2002/07/04 17:51:32	1.93
+++ loncom/interface/Attic/lonspreadsheet.pm	2002/07/04 20:09:31	1.94
@@ -1,5 +1,5 @@
 #
-# $Id: lonspreadsheet.pm,v 1.93 2002/07/04 17:51:32 www Exp $
+# $Id: lonspreadsheet.pm,v 1.94 2002/07/04 20:09:31 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1490,10 +1490,11 @@ sub tmpread {
         }
     } elsif ($nfield eq 'insertrow') {
         $countrows++;
+        my $newrow=substr('000000'.$i,-7);
         if ($nform eq 'top') {
-	    $fo{'A'.$countrows}='AAAAA_'.$countrows;
+	    $fo{'A'.$countrows}='--- '.$newrow;
         } else {
-            $fo{'A'.$countrows}='zzzzz_'.$countrows;
+            $fo{'A'.$countrows}='~~~ '.$newrow;
         }
     } else {
        if ($nfield) { $fo{$nfield}=$nform; }