Forgotten test arrangement.

[p5sagit/p5-mst-13.2.git] / ext / Digest / MD5 / t / files.t

diff --git a/ext/Digest/MD5/t/files.t b/ext/Digest/MD5/t/files.t
index 18d7009..5d25322 100644 (file)
--- a/ext/Digest/MD5/t/files.t
+++ b/ext/Digest/MD5/t/files.t
@@ -56,7 +56,7 @@ for (split /^/, $EXPECT) {
      my($md5hex, $file) = split ' ';
      my $base = $file;
      if ($ENV{PERL_CORE}) {
-         if ($file eq 'rfc1x321.txt') { # Don't have it in core.
+         if ($file eq 'rfc1321.txt') { # Don't have it in core.
             print "ok ", ++$testno, " # Skip: PERL_CORE\n";
             next;
         }