[LON-CAPA-cvs] cvs: rat / lonuserstate.pm

[raeburn]

raeburn		Mon May  6 18:08:39 2013 EDT

  Modified files:              
    /rat	lonuserstate.pm 
  Log:
  - Correction to change in &unlink_tmpfiles() in rev 1.138.
  
  
Index: rat/lonuserstate.pm
diff -u rat/lonuserstate.pm:1.144 rat/lonuserstate.pm:1.145
--- rat/lonuserstate.pm:1.144	Sun Nov 11 22:26:49 2012
+++ rat/lonuserstate.pm	Mon May  6 18:08:39 2013
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Construct and maintain state and binary representation of course for user
 #
-# $Id: lonuserstate.pm,v 1.144 2012/11/11 22:26:49 raeburn Exp $
+# $Id: lonuserstate.pm,v 1.145 2013/05/06 18:08:39 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1431,7 +1431,7 @@
     my ($fn) = @_;
     my $file_dir = dirname($fn);
 
-    if ($fn eq LONCAPA::tempdir()) {
+    if ("$file_dir/" eq LONCAPA::tempdir()) {
         my @files = qw (.db _symb.db .state _parms.db);
         foreach my $file (@files) {
             if (-e $fn.$file) {