bug fix where temp file was not being properly closed.

jacobwilliams · Jul 31, 2017 · a7ab913 · a7ab913
1 parent 1c35763
commit a7ab913
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/pyplot_module.f90 b/src/pyplot_module.f90
@@ -907,7 +907,7 @@ subroutine execute(me, pyfile, istat)
                 !delete the file (have to reopen it because
                 !Fortran has no file delete function)
                 open(newunit=iunit, file=file, status='OLD', iostat=istat)
-                if (istat/=0) close(iunit, status='DELETE', iostat=istat)
+                if (istat==0) close(iunit, status='DELETE', iostat=istat)
             end if
             if (istat/=0) then
                 write(error_unit,'(A)') 'Error closing file.'