From a08e1830e482e592f194e90f6dba51bab071a81b Mon Sep 17 00:00:00 2001
From: Huub Van Dam <hvandam@bnl.gov>
Date: Tue, 19 Apr 2011 06:20:49 +0000
Subject: [PATCH] HvD: Replaced an absolute character array dimension with a
 dimension specified by a parameter. This to keep the string dimensions
 consistent if the parameters are changed.

---
 src/input/get_inp_file.F | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/input/get_inp_file.F b/src/input/get_inp_file.F
index 8f10c1bd3f..5009468c2e 100644
--- a/src/input/get_inp_file.F
+++ b/src/input/get_inp_file.F
@@ -1,6 +1,7 @@
       subroutine get_input_filename(input_filename)
 C     $Id$
       implicit none
+#include "util.fh"
 #include "inp.fh"
 #include "global.fh"
 #include "stdio.fh"
@@ -12,7 +13,7 @@ c     argument begins with a hypen (-).
 c
 c     If the file cannot be accessed append .nw
 c     
-      character*255 test
+      character*(nw_max_path_len) test
       integer arg,nargs
 #if defined(CRAY)
       integer ilen,ierror