From f858c87db341b81979172365d2546b1f42e4dbfa Mon Sep 17 00:00:00 2001
From: Jukka Aho <jukka.aho@kapsi.fi>
Date: Thu, 15 Dec 2016 09:15:54 +0200
Subject: [PATCH] actually remove result files when overwrite=true

---
 src/io.jl | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/io.jl b/src/io.jl
index 1f37571..259f9c1 100644
--- a/src/io.jl
+++ b/src/io.jl
@@ -142,6 +142,7 @@ function Xdmf(name::String; overwrite=false)
     if isfile(h5file)
         if overwrite
             info("Result file $h5file exists, removing old file.")
+            rm(h5file)
         else
             error("Result file $h5file exists, use Xdmf($name ;overwrite=true) to rewrite results")
         end
@@ -150,6 +151,7 @@ function Xdmf(name::String; overwrite=false)
     if isfile(xmlfile)
         if overwrite
             info("Result file $xmlfile exists, removing old file.")
+            rm(xmlfile)
         else
             error("Result file $xmlfile exists, use Xdmf($name ;overwrite=true) to rewrite results")
         end