Add 'no_modify' to list of variables in 5.005.

p4raw-id: //depot/maint-5.004/perl@3240

1 files changed, 7 insertions, 6 deletions

diff --git a/embed.pl b/embed.pl
index 030e6080d1..d57d8a7c20 100755
--- a/embed.pl
+++ b/embed.pl
@@ -3,11 +3,12 @@
 require 5.003;
 
 my @vars5005 = qw(sv_undef sv_yes sv_no na dowarn
-                 curcop compiling 
-                 tainting tainted stack_base stack_sp sv_arenaroot
-                 curstash DBsub DBsingle debstash
-                 rsfp 
-                 stdingv
+		 curcop compiling 
+		 tainting tainted stack_base stack_sp sv_arenaroot
+		 no_modify
+		 curstash DBsub DBsingle debstash
+		 rsfp 
+		 stdingv
 		 defgv
 		 errgv
 		 rsfp_filters
@@ -15,7 +16,7 @@ my @vars5005 = qw(sv_undef sv_yes sv_no na dowarn
 		 diehook
 		 dirty
 		 perl_destruct_level
-                );
+		);
 
 
 sub readsyms (\%$) {