SF.net SVN: ledger-smb:[4402] trunk/LedgerSMB/Scripts/setup.pm

[..hidden..]

Revision: 4402
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=4402&view=rev
Author:   einhverfr
Date:     2012-03-07 11:04:51 +0000 (Wed, 07 Mar 2012)
Log Message:
-----------
Correcting accidental merge of error detection for contrib scripts

Modified Paths:
--------------
    trunk/LedgerSMB/Scripts/setup.pm

Modified: trunk/LedgerSMB/Scripts/setup.pm
===================================================================
--- trunk/LedgerSMB/Scripts/setup.pm	2012-03-07 10:54:19 UTC (rev 4401)
+++ trunk/LedgerSMB/Scripts/setup.pm	2012-03-07 11:04:51 UTC (rev 4402)
@@ -60,23 +60,6 @@
                 password => $creds->{password}}
     );
     my $server_info = $database->server_version;
-    my @sv_info = split(/\./, $server_info);
-    if (($sv_info[0] > 9)or ($sv_info[0]  == 9 and $sv_info[1] >= 1)){
-       if (! -f "$ENV{PG_CONTRIB_DIR}/tablefunc.control"){
-            $request->error($request->{_locale}->text(
-                      'Cannot find Contrib scripts in [_1].',
-                      $ENV{PG_CONTRIB_DIR}
-            ));
-       }
-    } else {
-       if (! -f "$ENV{PG_CONTRIB_DIR}/tablefunc.sql"){
-            $request->error($request->{_locale}->text(
-                      'Cannot find Contrib scripts in [_1].',
-                      $ENV{PG_CONTRIB_DIR}
-            ));
-      
-       }
-    }
     
     my $version_info = $database->get_info();
     if(!$request->{dbh}){$request->{dbh}=$database->{dbh};}#allow upper stack to disconnect dbh when leaving

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.