--- DBI-1.37/Makefile.PL~	2003-05-15 17:48:55 +0000

+++ DBI-1.37/Makefile.PL	2003-06-21 00:55:31 +0000

@@ -229,6 +229,7 @@ sub post_initialize {

     if ($cfg_privlibexp ne $cfg_sitelibexp) {

 	# this block could probably be removed now

 	my %old;

+=pod

 	File::Find::find( sub {

 	    local $_ = $File::Find::name;

 	    s:\\:/:g if $os eq 'MSWin32';

@@ -238,6 +239,7 @@ sub post_initialize {

 			      $_ eq $cfg_man3direxp );

 	    ++$old{$_} if m:\bDB(I|D$):; # DBI files, but just DBD dirs

 	}, $cfg_privlibexp, $cfg_archlibexp );

+=cut

 	if ( %old ) {

 	warn "

 Warning: By default new modules are installed into your 'site_lib'