--- loncom/homework/caparesponse/commands	2002/05/04 17:57:01	1.12
+++ loncom/homework/caparesponse/commands	2003/04/15 15:48:18	1.13
@@ -42,6 +42,12 @@ make ARCH=LONCAPA libcapa
 cd $path
 cp $CAPADIR/pProj/LONCAPA/*.o capaFunctions
 swig -perl5 capa.i 
+dist=`perl ../../build/distprobe`
+if [ $dist = "redhat8" ] 
+then
+	cat capa_wrap.c | perl -pe '$_=~s-SWIGEXPORT\(void,boot_capa\)\(CV\* cv\)\;-SWIGEXPORT\(void,boot_capa\)\(pTHX_ CV\* cv\)\;-;' > capa_wrap.c.new
+	mv capa_wrap.c.new capa_wrap.c
+fi
 cp Makefile.PL Makefile.pl
 perl Makefile.PL 
 make -f Makefile