[htoolkit-cvs] HSQL/PostgreSQL Setup.lhs,1.1,1.2

[<kr_...@us...>]

Update of /cvsroot/htoolkit/HSQL/PostgreSQL
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7000/PostgreSQL

Modified Files:
	Setup.lhs 
Log Message:
Another way to handle null values in HSQL. Not tested yet.


Index: Setup.lhs
===================================================================
RCS file: /cvsroot/htoolkit/HSQL/PostgreSQL/Setup.lhs,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** Setup.lhs	17 Jun 2005 06:47:07 -0000	1.1
--- Setup.lhs	12 Dec 2005 15:21:56 -0000	1.2
***************
*** 22,27 ****
        try (removeFile "PostgreSQL.buildinfo")
        return emptyHookedBuildInfo
!     postConf :: [String] -> ConfigFlags -> LocalBuildInfo -> IO ExitCode
!     postConf args flags localbuildinfo = do
        mb_bi <- pqConfigBuildInfo (configVerbose flags)
        writeHookedBuildInfo "PostgreSQL.buildinfo" (Just (fromMaybe emptyBuildInfo mb_bi),[])
--- 22,27 ----
        try (removeFile "PostgreSQL.buildinfo")
        return emptyHookedBuildInfo
!     postConf :: [String] -> ConfigFlags -> PackageDescription -> LocalBuildInfo -> IO ExitCode
!     postConf args flags _ localbuildinfo = do
        mb_bi <- pqConfigBuildInfo (configVerbose flags)
        writeHookedBuildInfo "PostgreSQL.buildinfo" (Just (fromMaybe emptyBuildInfo mb_bi),[])