perlfaq typos
[p5sagit/p5-mst-13.2.git] / embed.pl
index 709acc6..e318df1 100755 (executable)
--- a/embed.pl
+++ b/embed.pl
@@ -365,17 +365,7 @@ my @extras = qw(
     fprintf
 );
 
-my %skip;
-
-for $sym (qw[
-    utf8skip
-         ])
-{
-    $skip{$sym}++;
-}
-
 for $sym (sort(keys(%global),@extras)) {
-    next if exists $skip{$sym};
     print EM embedobj($sym);
 }