--- rat/lonratsrv.pm	2002/08/19 21:15:08	1.21
+++ rat/lonratsrv.pm	2002/08/31 00:42:30	1.22
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Server for RAT Maps
 #
-# $Id: lonratsrv.pm,v 1.21 2002/08/19 21:15:08 www Exp $
+# $Id: lonratsrv.pm,v 1.22 2002/08/31 00:42:30 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -205,8 +205,8 @@ sub savemap {
     my ($fn,$errtext)=@_;
     my %alltypes;
     my %allvalues;
-    if (($fn=~/\.sequence$/) ||
-        ($fn=~/\.page$/)) {
+    if (($fn=~/\.sequence(\.tmp)*$/) ||
+        ($fn=~/\.page(\.tmp)*$/)) {
 
 # ------------------------------------------------------------- Deal with input
         my @tags=split(/<&>/,$ENV{'form.output'});