projects
/
MojoFacets.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
3a01abb
)
don't generate zero for null values
author
Dobrica Pavlinusic
<dpavlin@rot13.org>
Tue, 22 Jun 2010 15:01:47 +0000
(17:01 +0200)
committer
Dobrica Pavlinusic
<dpavlin@rot13.org>
Tue, 22 Jun 2010 15:01:47 +0000
(17:01 +0200)
public/code/Duguje.float.pl
patch
|
blob
|
history
diff --git
a/public/code/Duguje.float.pl
b/public/code/Duguje.float.pl
index
960f63a
..
8e8c18c
100644
(file)
--- a/
public/code/Duguje.float.pl
+++ b/
public/code/Duguje.float.pl
@@
-1,7
+1,8
@@
foreach my $col ( grep { m/(Duguje|Potra.uje|Saldo)/ } keys %$row ) {
\r
foreach my $v ( @{ $row->{$col} } ) {
\r
+ next unless length($v) > 0;
\r
push @{ $update->{ $col . '_old' } }, $v;
\r
$v =~ s/(\d+)?\.?(\d{0,3})\,(\d{2})/$1$2.$3/;
\r
push @{ $update->{$col} }, sprintf('%.2f',$v);
\r
}
\r
-}
\ No newline at end of file
+}
\r