X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl_keyword.pl;h=f53416cc50edde78d09432373b5d485f00d1ff91;hb=e061ec81dcb60a85554e31a39475b89528de42f0;hp=f71c7d035d1d75448052b5baf3fe99263de87389;hpb=e3e804c95d90aee717e2c436ebefa57599e64a70;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/perl_keyword.pl b/perl_keyword.pl
index f71c7d0..f53416c 100644
--- a/perl_keyword.pl
+++ b/perl_keyword.pl
@@ -15,7 +15,7 @@ my @pos = qw(__DATA__ __END__ AUTOLOAD BEGIN CHECK DESTROY default defined
 my @neg = qw(__FILE__ __LINE__ __PACKAGE__ and abs alarm atan2 accept bless
 	    break bind binmode CORE cmp chr cos chop close chdir chomp chmod
 	    chown crypt chroot caller connect closedir continue die dump
-	    dbmopen dbmclose eq eof err exp exit exec each endgrent endpwent
+	    dbmopen dbmclose eq eof exp exit exec each endgrent endpwent
 	    endnetent endhostent endservent endprotoent fork fcntl flock fileno
 	    formline getppid getpgrp getpwent getpwnam getpwuid getpeername
 	    getprotoent getpriority getprotobyname getprotobynumber
@@ -44,8 +44,6 @@ my %feature_kw = (
 
 	say     => 'say',
 
-	err	=> 'err',
-
 	state	=> 'state',
 	);