From 6daef9205280f61b5830c13836b849eb11462471 Mon Sep 17 00:00:00 2001
From: Tobi Oetiker <tobi@oetiker.ch>
Date: Wed, 25 Jul 2007 22:14:53 +0000
Subject: for retreive the network byteorder gets detected automagically

---
 lib/Smokeping/Slave.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'lib/Smokeping')

diff --git a/lib/Smokeping/Slave.pm b/lib/Smokeping/Slave.pm
index b02511b..38dab1c 100644
--- a/lib/Smokeping/Slave.pm
+++ b/lib/Smokeping/Slave.pm
@@ -3,7 +3,7 @@ package Smokeping::Slave;
 use warnings;
 use strict;
 use Data::Dumper;
-use Storable qw(nstore nretreive);
+use Storable qw(nstore retreive);
 use Digest::MD5 qw(md5_ base64);
 use LWP::UserAgent;
 use Smokeping;
@@ -63,7 +63,7 @@ sub submit_results {
     my $store = $slave_cfg->{cache_dir}."/data";
     $store .= "_$myprobe" if $myprobe;
     $store .= ".cache";
-    my $restore = nretrieve $store if -f $store; 
+    my $restore = retrieve $store if -f $store; 
     my $data =  get_results($slave_cfg, $cfg, $probes, $cfg->{Targets}, $cfg->{General}{datadir}, $myprobe);    
     push @$data, @$restore;    
     my $data_dump = Dumper $data;
-- 
cgit v1.2.3-24-g4f1b