Doesn't make any difference for the test but is more logical.

p4raw-id: //depot/perl@19398

diff --git a/t/lib/Devel/switchd.pm b/t/lib/Devel/switchd.pm
index b034364..4a657be 100644 (file)
--- a/t/lib/Devel/switchd.pm
+++ b/t/lib/Devel/switchd.pm
@@ -1,4 +1,4 @@
-package Devel::DevelTest;
+package Devel::switchd;
 use strict; BEGIN { } # use strict; BEGIN { ... } to incite [perl #21890]
 package DB;
 sub DB { print join(",", caller), ";" }