From 5b9f84cee9183b22ccfaed9d25fa4ae9f6d1abe7 Mon Sep 17 00:00:00 2001
From: kkudin <kkudin@c92efa57-630b-4861-b058-cf58834340f0>
Date: Mon, 10 Jul 2006 20:15:57 +0000
Subject: [PATCH] prefix.EXIT was broken by the last update (QE-3.1.1 does not
 work).  Kostya

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@3263 c92efa57-630b-4861-b058-cf58834340f0
---
 Modules/check_stop.f90 | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

diff --git a/Modules/check_stop.f90 b/Modules/check_stop.f90
index 7c083cba4..d6cc661af 100644
--- a/Modules/check_stop.f90
+++ b/Modules/check_stop.f90
@@ -116,12 +116,14 @@ MODULE check_stop
              OPEN( UNIT = iunexit, FILE = TRIM( exit_file ) )
              CLOSE( UNIT = iunexit, STATUS = 'DELETE' )
              !
+          ELSE
+             !
+             seconds = elapsed_seconds()
+             !
+             check_stop_now = ( seconds  >  max_seconds )
+             !
           END IF
           !
-          seconds = elapsed_seconds()
-          !
-          check_stop_now = ( seconds  >  max_seconds )
-          !
        END IF
        !
        CALL mp_bcast( check_stop_now, ionode_id, intra_image_comm )