]> wagnertech.de Git - mfinanz.git/blobdiff - SL/DBUpgrade2.pm
Part Controller -part link in Verbrauchsbericht (?) aktualisiert
[mfinanz.git] / SL / DBUpgrade2.pm
index 5c8280b2c067555f47cb2e97f52a45e97dc5b783..496d15f2640150e6d9bbc83e3d5a7cb06c64aebe 100644 (file)
@@ -7,6 +7,7 @@ use List::MoreUtils qw(any);
 use SL::Common;
 use SL::DBUpgrade2::Base;
 use SL::DBUtils;
+use SL::System::Process;
 
 use strict;
 
@@ -26,7 +27,7 @@ sub init {
 
   $params{path_suffix} ||= '';
   $params{schema}      ||= '';
-  $params{path}        ||= "sql/Pg-upgrade2" . $params{path_suffix};
+  $params{path}        ||= SL::System::Process->exe_dir . "/sql/Pg-upgrade2" . $params{path_suffix};
 
   map { $self->{$_} = $params{$_} } keys %params;