diff --git a/t/02_fix_some_things.t b/t/02_fix_some_things.t
index e5eeb5c..7a5c9e7 100644
--- a/t/02_fix_some_things.t
+++ b/t/02_fix_some_things.t
@@ -8,8 +8,8 @@ use Term::ANSIColorx::ColorNicknames qw(fix_color);
 my %fix_these = (
     "bold-blue on white" => "bold blue on_white",
     "bold sky-on-white"  => "bold blue on_white",
-    "\ablack"            => "black",
-    black                => "bold black",
+    "\ayellow"           => "yellow",
+    pitch                => "bold black",
 );
 
 plan tests => 0 + (keys %fix_these);
diff --git a/t/50_exports.t b/t/50_exports.t
index c8825a8..0ec59fc 100644
--- a/t/50_exports.t
+++ b/t/50_exports.t
@@ -14,8 +14,8 @@ my %todo = (
     color_1 => [ ['blue'],               ['blue'] ],
     color_2 => [ ['bold blue'],          ['sky'] ],
     color_3 => [ ['bold blue on_white'], ['bold-sky-on-white'] ],
-    color_4 => [ ['bold black'],         ['black'] ],
-    color_5 => [ ['black'],              ['normal black'] ],
+    color_4 => [ ['bold yellow'],        ['bold yellow'] ],
+    color_5 => [ ['yellow'],             ['normal yellow'] ],
 
     # … from the perlpod — is this really true?
     # "bold blue" eq fix_color("bold dark bold faint dark bold blue");