diff options
| author | Tobi Oetiker <tobi@oetiker.ch> | 2006-01-05 21:14:36 +0100 |
|---|---|---|
| committer | Tobi Oetiker <tobi@oetiker.ch> | 2006-01-05 21:14:36 +0100 |
| commit | b0435f544c7bc175a2a1741394357f2f44622a97 (patch) | |
| tree | 1cc1d29cee0d928a40fbd017b47726bdf699b2f0 /lib/Smokeping/RRDtools.pm | |
| parent | fb6979fa7f47246b2b8fd022f448030b7e1b8702 (diff) | |
| download | smokeping-b0435f544c7bc175a2a1741394357f2f44622a97.tar.gz smokeping-b0435f544c7bc175a2a1741394357f2f44622a97.tar.xz | |
portability for perl 5.8.7
Diffstat (limited to 'lib/Smokeping/RRDtools.pm')
| -rw-r--r-- | lib/Smokeping/RRDtools.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Smokeping/RRDtools.pm b/lib/Smokeping/RRDtools.pm index 6127d49..fe6ae4f 100644 --- a/lib/Smokeping/RRDtools.pm +++ b/lib/Smokeping/RRDtools.pm @@ -104,7 +104,7 @@ use RRDs; sub info2create { my $file = shift; my @create; - my $buggy_perl_version = 1 if $^V and $^V eq v5.8.0; + my $buggy_perl_version = 1 if $^V and $^V eq "v5.8.0"; my $info = RRDs::info($file); my $error = RRDs::error; die("RRDs::info $file: ERROR: $error") if $error; |