Remove profanity

diff --git a/t/14-ro.t b/t/14-ro.t
index 1c4a7e07814e8d42b6972b98e24622918efa47be..19b8192675c5f48c238494a884414d1f6a208ffc 100644 (file)
--- a/t/14-ro.t
+++ b/t/14-ro.t
@@ -8,12 +8,12 @@ use Test::More tests => 4;
 sub Str::TYPEDSCALAR { }
 
 sub Str1::TYPEDSCALAR {
- $_[0] = 'dongs';
+ $_[0] = 'derp';
  ();
 }
 
 sub Str2::TYPEDSCALAR {
- $_[2] = 'hlagh';
+ $_[2] = 'herp';
  ();
 }
 
@@ -31,7 +31,7 @@ sub maybe_warn {
  maybe_warn();
  local $@;
  eval q!
-  use Lexical::Types as => sub { $_[0] = 'dongs'; () };
+  use Lexical::Types as => sub { $_[0] = 'derp'; () };
   my Str $x;
  !;
  like $@, ro_re('', 2), '$_[0] in initializer is read only';
@@ -42,7 +42,7 @@ SKIP: {
  maybe_warn();
  local $@;
  eval q!
-  use Lexical::Types as => sub { $_[1] = 'hlagh'; () };
+  use Lexical::Types as => sub { $_[1] = 'herp'; () };
   my Str $x;
  !;
  like $@, ro_re('', 2), '$_[1] in initializer is read only';