lexsub.t: Fix some tests

I got this working a few commits ago, but the tests mentioned the
wrong sub name.

diff --git a/t/cmd/lexsub.t b/t/cmd/lexsub.t
index 404f7dd..36689e7 100644 (file)
--- a/t/cmd/lexsub.t
+++ b/t/cmd/lexsub.t
@@ -160,16 +160,14 @@ sub sc { 43 }
 {
   state sub sc;
   eval{sc};
-::on;
-  like $@, qr/^Undefined subroutine &sb called at /,
+  like $@, qr/^Undefined subroutine &sc called at /,
      'state sub foo; makes no lex alias for existing sub';
   eval{&sc};
-  like $@, qr/^Undefined subroutine &sb called at /,
+  like $@, qr/^Undefined subroutine &sc called at /,
      'state sub foo; makes no lex alias for existing sub (amper)';
   eval{do sc()};
-  like $@, qr/^Undefined subroutine &sb called at /,
+  like $@, qr/^Undefined subroutine &sc called at /,
      'state sub foo; makes no lex alias for existing sub (do)';
-::off;
 }
 package main;
 {