Skip to content
Snippets Groups Projects
Commit 27834108 authored by Brian Carrier's avatar Brian Carrier
Browse files

Fixed typo bugs in sorter as reported by Drew Hunt.

parent 834a6e72
No related branches found
No related tags found
No related merge requests found
...@@ -47,6 +47,8 @@ pad with 0s). Fix by Bruce Nikkel. ...@@ -47,6 +47,8 @@ pad with 0s). Fix by Bruce Nikkel.
3/23/09: Bug Fix: Fixed bug 2708195, for long reads in fragmented 3/23/09: Bug Fix: Fixed bug 2708195, for long reads in fragmented
attributes. Reported and patch by Jamie Butler (Mandiant). attributes. Reported and patch by Jamie Butler (Mandiant).
4/8/09: Fixed typo bugs in sorter as reported by Drew Hunt.
---------------- VERSION 3.0.0 -------------- ---------------- VERSION 3.0.0 --------------
0/00/00: Update: Many, many, many API changes. 0/00/00: Update: Many, many, many API changes.
......
...@@ -680,7 +680,7 @@ sub analyze_file { ...@@ -680,7 +680,7 @@ sub analyze_file {
chomp $sha1; chomp $sha1;
} }
if ($DO_MD5 == 1) { if ($DO_MD5 == 1) {
$sha1 = $md5 =
`\"$SK_ICAT\" $IMGTYPE -o $IMGOFF $FSTYPE $recflag $IMG \"$inode\" | \"$SK_MD5\"`; `\"$SK_ICAT\" $IMGTYPE -o $IMGOFF $FSTYPE $recflag $IMG \"$inode\" | \"$SK_MD5\"`;
chomp $md5; chomp $md5;
} }
...@@ -847,7 +847,7 @@ sub analyze_file { ...@@ -847,7 +847,7 @@ sub analyze_file {
# it will be considered a mismatch # it will be considered a mismatch
$mismatch = 1; $mismatch = 1;
$ext =~ tr/[A-Z]/[a-z/; $ext =~ tr/[A-Z]/[a-z]/;
# cycle through each possible extension for this type # cycle through each possible extension for this type
foreach my $cat_ext (@{$file_to_ext{$ext_kw}}) { foreach my $cat_ext (@{$file_to_ext{$ext_kw}}) {
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment