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;