File project1.diff of Package perl

--- STAGE1_ext_NDBM_File.xs.diff.orig
+++ STAGE1_ext_NDBM_File.xs.diff
@@ -0,0 +1,12 @@
+diff -Naur _perl-5.10.0//ext/NDBM_File/NDBM_File.xs perl-5.10.0/ext/NDBM_File/NDBM_File.xs
+--- _perl-5.10.0//ext/NDBM_File/NDBM_File.xs	2007-12-18 11:47:07.000000000 +0100
++++ perl-5.10.0/ext/NDBM_File/NDBM_File.xs	2009-01-30 21:28:33.292068715 +0100
+@@ -1,7 +1,7 @@
+ #include "EXTERN.h"
+ #include "perl.h"
+ #include "XSUB.h"
+-#include <ndbm.h>
++#include <gdbm/ndbm.h>
+ 
+ typedef struct {
+ 	DBM * 	dbp ;
--- perl.spec.orig
+++ perl.spec
@@ -34,6 +34,7 @@ Obsoletes:      perl-Compress-Zlib perl-
 Provides:       perl-version perl-IO-Zlib perl-ExtUtils-ParseXS
 Obsoletes:      perl-version perl-IO-Zlib perl-ExtUtils-ParseXS
 %if 0%{stage1}
+Patch99:        STAGE1_ext_NDBM_File.xs.diff
 %else  
 Recommends:     perl-doc = %version
 %endif
@@ -130,6 +131,11 @@ Authors:
 %patch7
 %patch8
 
+%if 0%{stage1}
+%patch99 -p1
+%else  
+%endif
+
 %build
 options="-Doptimize='$RPM_OPT_FLAGS -Wall -pipe'"
 %ifarch alpha
@@ -709,3 +715,4 @@ EOF
 * Thu Jan 02 1997 florian@suse.de
   update to version 5.003
   security fix for suidperl
+