X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/e66ad3503cde2847fa749cda083ec75dea5c7343..237da80732005e84a2def6552964d928f0fc014f:/regen/mg_vtable.pl

diff --git a/regen/mg_vtable.pl b/regen/mg_vtable.pl
index d8217a8..0bbfbfd 100644
--- a/regen/mg_vtable.pl
+++ b/regen/mg_vtable.pl
@@ -72,7 +72,7 @@ my %mg =
      tiedscalar => { char => 'q', vtable => 'packelem',
 		     desc => 'Tied scalar or handle' },
      qr => { char => 'r', vtable => 'regexp', value_magic => 1, 
-	     desc => 'precompiled qr// regex' },
+	     readonly_acceptable => 1, desc => 'precompiled qr// regex' },
      sig => { char => 'S', desc => '%SIG hash' },
      sigelem => { char => 's', vtable => 'sigelem',
 		  desc => '%SIG hash element' },