projects
/
collectd.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
e620d43
)
pass fractional seconds upwards as floats
author
Matthias Bethke
<mbe@financial.com>
Tue, 22 Nov 2016 16:37:33 +0000
(23:37 +0700)
committer
Matthias Bethke
<mbe@financial.com>
Tue, 22 Nov 2016 16:37:33 +0000
(23:37 +0700)
bindings/perl/lib/Collectd/Unixsock.pm
patch
|
blob
|
history
diff --git
a/bindings/perl/lib/Collectd/Unixsock.pm
b/bindings/perl/lib/Collectd/Unixsock.pm
index
37f04cf
..
96287eb
100644
(file)
--- a/
bindings/perl/lib/Collectd/Unixsock.pm
+++ b/
bindings/perl/lib/Collectd/Unixsock.pm
@@
-404,10
+404,10
@@
sub listval_filter
my ($time, $ident) = split / /, $msg, 2;
$ident = _parse_identifier ($ident);
my ($time, $ident) = split / /, $msg, 2;
$ident = _parse_identifier ($ident);
- $ident->{time} =
int
$time;
+ $ident->{time} =
0+
$time;
push (@ret, $ident);
push (@ret, $ident);
- } # for (i = 0 .. $
statu
s)
+ } # for (i = 0 .. $
nresult
s)
return @ret;
} # listval_filter
return @ret;
} # listval_filter
@@
-446,10
+446,10
@@
sub listval
my ($time, $ident) = split / /, $msg, 2;
$ident = _parse_identifier ($ident);
my ($time, $ident) = split / /, $msg, 2;
$ident = _parse_identifier ($ident);
- $ident->{time} =
int
$time;
+ $ident->{time} =
0+
$time;
push (@ret, $ident);
push (@ret, $ident);
- } # for (i = 0 .. $
statu
s)
+ } # for (i = 0 .. $
nresult
s)
return @ret;
} # listval
return @ret;
} # listval