From fb1265db3d43db3412a407a579aefb43fa5da7b8 Mon Sep 17 00:00:00 2001
From: Martin Diehl <m.diehl@mpie.de>
Date: Mon, 16 Jul 2018 20:08:31 +0200
Subject: [PATCH] checking for existing file

---
 src/config.f90 | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/config.f90 b/src/config.f90
index 022247aeb..86b1bc501 100644
--- a/src/config.f90
+++ b/src/config.f90
@@ -125,6 +125,8 @@ subroutine config_init()
  if(jobSpecificConfig) then
    fileContent = IO_recursiveRead(trim(getSolverJobName())//'.'//material_localFileExt)
  else
+   inquire(file='material.config',exist=jobSpecificConfig)
+   if(.not. jobSpecificConfig) call IO_error(0_pInt)
    fileContent = IO_recursiveRead('material.config')
  endif