From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Mon, 30 Aug 1999 21:36:24 +0000 (+0000)
Subject: Retract #3922 (Rule #1 was invoked).
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=aa32913f3abc1e07f8a5bdb31411f65d1fdbcf6f;p=p5sagit%2Fp5-mst-13.2.git

Retract #3922 (Rule #1 was invoked).
(See also #4058).

p4raw-id: //depot/cfgperl@4056
---

diff --git a/pod/perldiag.pod b/pod/perldiag.pod
index 2634d83..87b5d9e 100644
--- a/pod/perldiag.pod
+++ b/pod/perldiag.pod
@@ -2652,10 +2652,6 @@ See L<perlfunc/sort>.
 (F) A sort comparison subroutine may not return a list value with more
 or less than one element.  See L<perlfunc/sort>.
 
-=item split /^/ better written as split /^/m
-
-(W) Implicit translation of /^/ to mean /^/m in split is deprecated.
-
 =item Split loop
 
 (P) The split was looping infinitely.  (Obviously, a split shouldn't iterate
diff --git a/regexp.h b/regexp.h
index 414b254..5d787e0 100644
--- a/regexp.h
+++ b/regexp.h
@@ -69,8 +69,6 @@ typedef struct regexp {
 #define RE_INTUIT_ONECHAR	0x4000000
 #define RE_INTUIT_TAIL		0x8000000
 
-#define ROPT_WARNED		0x10000000
-
 #define RE_USE_INTUIT		(RE_USE_INTUIT_NOML|RE_USE_INTUIT_ML)
 #define REINT_AUTORITATIVE	(REINT_AUTORITATIVE_NOML|REINT_AUTORITATIVE_ML)
 #define REINT_ONCE		(REINT_ONCE_NOML|REINT_ONCE_ML)