From 30f429bf90d83e9162272a87d1917ec4d96e034b Mon Sep 17 00:00:00 2001 From: dormando Date: Thu, 29 Mar 2012 17:48:27 -0700 Subject: [PATCH] show checksum in mogfiledebug --- mogfiledebug | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/mogfiledebug b/mogfiledebug index 5c9c162..dca9c5e 100755 --- a/mogfiledebug +++ b/mogfiledebug @@ -151,6 +151,10 @@ if (my $devids = $details->{devids}) { print " - Raw devids: ", $devids, "\n"; } +if (my $hash = $details->{checksum}) { + print " - Stored checksum: ", $hash, "\n"; +} + sub fetch_path { my $path = shift; my $ua = LWP::UserAgent->new;