From 5bdeeb0783b7f8c47ce3864e63858423ae7977bb Mon Sep 17 00:00:00 2001
From: Holger Vogt <holger.vogt@uni-due.de>
Date: Sun, 8 Jul 2018 13:00:31 +0200
Subject: [PATCH] add variabale inputdir to store the last input file directory

---
 src/frontend/inp.c | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/frontend/inp.c b/src/frontend/inp.c
index 46b8657ea..425646f98 100644
--- a/src/frontend/inp.c
+++ b/src/frontend/inp.c
@@ -452,6 +452,10 @@ inp_spsource(FILE *fp, bool comfile, char *filename, bool intfile)
         }
     }
     endTime = seconds();
+    /* store input directory to a variable*/
+    if (fp) {
+        cp_vset("inputdir", CP_STRING, dir_name);
+    }
     tfree(dir_name);
 
     /* if nothing came back from inp_readall, just close fp and return to caller */