Revision cf63992e
Von Sven Schöling vor etwa 10 Jahren hinzugefügt
SL/PriceSource/Price.pm | ||
---|---|---|
26 | 26 |
: $self->description |
27 | 27 |
} |
28 | 28 |
|
29 |
sub source_description { |
|
30 |
my ($self) = @_; |
|
31 |
|
|
32 |
$self->price_source |
|
33 |
? $self->price_source->description |
|
34 |
: $self->description |
|
35 |
} |
|
36 |
|
|
29 | 37 |
sub to_str { |
30 | 38 |
"source: @{[ $_[0]->source ]}, price: @{[ $_[0]->price]}, description: @{[ $_[0]->description ]}" |
31 | 39 |
} |
bin/mozilla/io.pl | ||
---|---|---|
326 | 326 |
if ($form->{"id_${i}"} && !$is_delivery_order) { |
327 | 327 |
my $price_source = SL::PriceSource->new(record_item => $record_item, record => $record); |
328 | 328 |
my $price = $price_source->price_from_source($::form->{"active_price_source_$i"}); |
329 |
$column_data{price_source} .= $cgi->button(-value => $price->full_description, -onClick => "kivi.io.price_chooser($i)");
|
|
329 |
$column_data{price_source} .= $cgi->button(-value => $price->source_description, -onClick => "kivi.io.price_chooser($i)");
|
|
330 | 330 |
if ($price->source) { |
331 | 331 |
$column_data{price_source} .= ' ' . $cgi->img({src => 'image/flag-red.png', alt => $price->invalid, title => $price->invalid }) if $price->invalid; |
332 | 332 |
$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