X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/d890f886effd222cdff138acea5f44f45f6c12b0..e14cb525c640cb15bb6b2dfb62ccebbe78cb45cd:/sql/Pg-upgrade2/USTVA_abstraction.pl diff --git a/sql/Pg-upgrade2/USTVA_abstraction.pl b/sql/Pg-upgrade2/USTVA_abstraction.pl index e94812855..96c6b73b4 100644 --- a/sql/Pg-upgrade2/USTVA_abstraction.pl +++ b/sql/Pg-upgrade2/USTVA_abstraction.pl @@ -8,6 +8,8 @@ ################### +use strict; + die("This script cannot be run from the command line.") unless ($main::form); sub mydberror {