From 8eafda835ab0217bdc7fed637ab694a06fa5a7f8 Mon Sep 17 00:00:00 2001
From: tradke <tradke@ebee0441-1374-4afa-a3b5-247f3ba15b9a>
Date: Wed, 16 Nov 2005 13:53:24 +0000
Subject: Don't remove an initial data checkpoint file if IO::checkpoint_keep
 is set to a value larger 0.

git-svn-id: http://svn.cactuscode.org/arrangements/CactusPUGHIO/IOFlexIO/trunk@343 ebee0441-1374-4afa-a3b5-247f3ba15b9a
---
 src/DumpGH.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/DumpGH.c b/src/DumpGH.c
index 21d1af0..caae926 100644
--- a/src/DumpGH.c
+++ b/src/DumpGH.c
@@ -514,7 +514,7 @@ static int Checkpoint (const cGH *GH, int called_from)
 
   /* delete the oldest dumpfile if checkpoint_keep_all isn't set
      and put the new filename into the ring buffer */
-  if (checkpoint_keep > 0)
+  if (called_from == CP_EVOLUTION_DATA && checkpoint_keep > 0)
   {
     if (myGH->cp_filenames[myGH->cp_fileindex])
     {
-- 
cgit v1.2.3