Revision cf63992e
Von Sven Schöling vor etwa 10 Jahren hinzugefügt
| SL/PriceSource/Price.pm | ||
|---|---|---|
|
: $self->description
|
||
|
}
|
||
|
|
||
|
sub source_description {
|
||
|
my ($self) = @_;
|
||
|
|
||
|
$self->price_source
|
||
|
? $self->price_source->description
|
||
|
: $self->description
|
||
|
}
|
||
|
|
||
|
sub to_str {
|
||
|
"source: @{[ $_[0]->source ]}, price: @{[ $_[0]->price]}, description: @{[ $_[0]->description ]}"
|
||
|
}
|
||
| bin/mozilla/io.pl | ||
|---|---|---|
|
if ($form->{"id_${i}"} && !$is_delivery_order) {
|
||
|
my $price_source = SL::PriceSource->new(record_item => $record_item, record => $record);
|
||
|
my $price = $price_source->price_from_source($::form->{"active_price_source_$i"});
|
||
|
$column_data{price_source} .= $cgi->button(-value => $price->full_description, -onClick => "kivi.io.price_chooser($i)");
|
||
|
$column_data{price_source} .= $cgi->button(-value => $price->source_description, -onClick => "kivi.io.price_chooser($i)");
|
||
|
if ($price->source) {
|
||
|
$column_data{price_source} .= ' ' . $cgi->img({src => 'image/flag-red.png', alt => $price->invalid, title => $price->invalid }) if $price->invalid;
|
||
|
$column_data{price_source} .= ' ' . $cgi->img({src => 'image/flag-red.png', alt => $price->missing, title => $price->missing }) if $price->missing;
|
||
Auch abrufbar als: Unified diff
PriceSource: Nur den Namen des Moduls anzeigen, nicht den vollen Namen