diff -ur ../original-cernlib-source/src/geant321/miface/gmorin.F src/geant321/miface/gmorin.F
--- ../original-cernlib-source/src/geant321/miface/gmorin.F Mon Sep 30 10:26:05 1996
+++ src/geant321/miface/gmorin.F Tue Oct 22 07:27:55 2002
@@ -112,7 +112,7 @@
OPEN(UNIT=MICROS,FILE=XSFILE, STATUS='OLD',READONLY)
#endif
#if defined(CERNLIB_UNIX)||defined(CERNLIB_CRAY)
- XSFILE = 'xsneut95.dat'
+ XSFILE = 'DATADIR/xsneut95.dat'
INQUIRE(FILE=XSFILE,EXIST=EXISTS)
IF(.NOT.EXISTS) THEN
CHROOT=' '
diff -ur ../original-cernlib-source/src/mclibs/cojets/test/test.F src/mclibs/cojets/test/test.F
--- ../original-cernlib-source/src/mclibs/cojets/test/test.F Mon Mar 25 07:53:36 1996
+++ src/mclibs/cojets/test/test.F Tue Oct 22 07:27:55 2002
@@ -6,7 +6,7 @@
#if defined(CERNLIB_IBMVM)
PARAMETER (DFILE='/COJETS DATA *')
#else
- PARAMETER (DFILE='cojets.dat')
+ PARAMETER (DFILE='DATADIR/cojets.dat')
#endif
C
C MAIN PROGRAM FOR COJETS
diff -ur ../original-cernlib-source/src/mclibs/eurodec/eurodec/eufiles.inc src/mclibs/eurodec/eurodec/eufiles.inc
--- ../original-cernlib-source/src/mclibs/eurodec/eurodec/eufiles.inc Fri Mar 8 11:58:49 1996
+++ src/mclibs/eurodec/eurodec/eufiles.inc Tue Oct 22 07:27:55 2002
@@ -18,7 +18,7 @@
PARAMETER (ETFILE='/EUTITLE DAT *')
#endif
CHARACTER*(*) EDFILE,ETFILE
- PARAMETER (EDFILE='eurodec.dat')
+ PARAMETER (EDFILE='DATADIR/eurodec.dat')
PARAMETER (ETFILE='eutitle.dat')
#endif
diff -ur ../original-cernlib-source/src/mclibs/isajet/test/isajett.F src/mclibs/isajet/test/isajett.F
--- ../original-cernlib-source/src/mclibs/isajet/test/isajett.F Fri Mar 14 12:32:39 1997
+++ src/mclibs/isajet/test/isajett.F Tue Oct 22 07:27:55 2002
@@ -8,7 +8,7 @@
#if defined(CERNLIB_VAXVMS)
PARAMETER (DFILE='CERN_ROOT:[lib]isajet.dat')
#else
- PARAMETER (DFILE='isajet.dat')
+ PARAMETER (DFILE='DATADIR/isajet.dat')
#endif
#endif
C