]> wagnertech.de Git - mfinanz.git/blobdiff - sql/Pg-upgrade2/defaults_feature.pl
reverse Charge Upgrade Skript. Syntax und Vorgängerversion
[mfinanz.git] / sql / Pg-upgrade2 / defaults_feature.pl
index 2e13982139f3a7d146f787fd07aec749ec6b04ec..8d9b86360f90d3fdf4f1b65b12fe3e3d76814492 100644 (file)
@@ -21,14 +21,17 @@ sub run {
 
   # check current configuration and set default variables accordingly, so that
   # kivitendo's behaviour isn't changed by this update
-  # if checks are not set in config leave it to the default value
+  my %old_defaults = ( parts_show_image => 1 );
+
   foreach my $check (qw(webdav vertreter parts_show_image parts_listing_image)) {
-    my $check_set = $::lx_office_conf{features}->{$check} ? 1 : 0;
-    $self->db_query("UPDATE defaults SET $check = ?", bind => [ $check_set ]) if $check_set;
+    my $check_set = exists $::lx_office_conf{features}->{$check} ? $::lx_office_conf{features}->{$check} : $old_defaults{$check};
+    $self->db_query("UPDATE defaults SET $check = ?", bind => [ $check_set ? 1 : 0 ]);
   }
 
-  my $update_column = "UPDATE defaults SET parts_image_css = ?";
-  $self->db_query($update_column, bind => [ $::lx_office_conf{features}->{parts_image_css} ]);
+  if (exists $::lx_office_conf{features}->{parts_image_css}) {
+    my $update_column = "UPDATE defaults SET parts_image_css = ?";
+    $self->db_query($update_column, bind => [ $::lx_office_conf{features}->{parts_image_css} ]);
+  }
 
   return 1;
 }