Blame paw-313-comis-preserves-filename-case.dpatch

6ea53b2
#! /bin/sh /usr/share/dpatch/dpatch-run
6ea53b2
## 313-comis-preserves-filename-case.dpatch by  <kmccarty@debian.org>
6ea53b2
##
6ea53b2
## All lines beginning with `## DP:' are a description of the patch.
6ea53b2
## DP: Have COMIS preserve filename case when interpreting FORTRAN code.
6ea53b2
6ea53b2
@DPATCH@
6ea53b2
diff -urNad cernlib-2005.05.09/src/pawlib/paw/code/pawint3.F /tmp/dpep.GROFhd/cernlib-2005.05.09/src/pawlib/paw/code/pawint3.F
6ea53b2
--- cernlib-2005.05.09/src/pawlib/paw/code/pawint3.F	1999-05-20 03:37:18.000000000 -0400
6ea53b2
+++ /tmp/dpep.GROFhd/cernlib-2005.05.09/src/pawlib/paw/code/pawint3.F	2005-06-09 15:23:49.276738602 -0400
6ea53b2
@@ -140,7 +140,7 @@
6ea53b2
       CHUTIT = ' '
6ea53b2
 *
6ea53b2
       IF (IPIAF.EQ.0) THEN
6ea53b2
-         CALL KUOPEN(10,'PAW.METAFILE','UNKNOWN',ISTAT)
6ea53b2
+         CALL KUOPEN(10,'paw.metafile','UNKNOWN',ISTAT)
6ea53b2
 #if (defined(CERNLIB_IBM))&&(!defined(CERNLIB_IBMMVS))
6ea53b2
          CALL HERMES(19)
6ea53b2
          CALL VMCMS('FILEDEF 19 DISK GKSERROR OUTPUT A',IRET)