From bfa80c3c2349d71aeb4c84eb3b3e16fcdb87f12e Mon Sep 17 00:00:00 2001
From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Thu, 2 Dec 2010 14:34:37 +0100
Subject: [PATCH] save grouped json data

---
 printer-callbacks.pl | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/printer-callbacks.pl b/printer-callbacks.pl
index 38a76f7..38aa41b 100755
--- a/printer-callbacks.pl
+++ b/printer-callbacks.pl
@@ -83,7 +83,6 @@ sub columns_cb {
 			substr($r_oid,0,length($_)) eq $_
 		} keys %$oid2name)[0] || die "no name for $r_oid in ",dump($oid2name);
 		my $name = $oid2name->{$oid};
-warn "++ $oid $name $var\n";
 		if ( $name =~ m{^\@} ) {
 			my $no_prefix = $name;
 			$no_prefix =~ s{^\@}{};
@@ -94,8 +93,6 @@ warn "++ $oid $name $var\n";
 	}
 
 	warn "## $ip response ",dump($response->{$ip});
-	save_json $ip => $response->{$ip};
-	print $log encode_json($response->{$ip}),"\n";
 }
 
 foreach my $host ( @printers ) {
@@ -151,6 +148,8 @@ foreach my $ip ( keys %$response ) {
 	}
 
 	print "$ip ",dump($status);
+	save_json $ip => $response->{$ip};
+	print $log encode_json($response->{$ip}),"\n";
 }
 
 close($log);
-- 
2.20.1