projekt kivitendo

use List::Util qw(first);

  # locales simple check for english

  my $english = SL::DB::Manager::Language->get_first(query => [ description   => { ilike => 'Englisch' },

                                                        or => [ template_code => { ilike => 'en' } ],

                                                    ]);

  if (ref $english eq 'SL::DB::Language') {

    # add english translation for product

    # TODO (or not): No Translations for shop_part->shop_description available

    my $translation = first { $english->id == $_->language_id } @{ $part->translations };

    $update_p->{translations}->{'en-GB'}->{name}        = $translation->{translation};

    $update_p->{translations}->{'en-GB'}->{description} = $translation->{longdescription};

  }

Updates all metadata for a shop part. See base class for a general description.

Specific Implementation notes:

=over 4

=item * Calls sync_all_images with set_cover = 1 and delete_orphaned = 1

=item * Checks if longdescription should be taken from part or shop_part

=item * Checks if a language with the name 'Englisch' or template_code 'en'

      is available and sets the shopware6 'en-GB' locales for the product

=back