Fix a cut-n-paste error.

p4raw-id: //depot/perl@17192

diff --git a/pod/perldiag.pod b/pod/perldiag.pod
index 6907866..10b77c9 100644 (file)
--- a/pod/perldiag.pod
+++ b/pod/perldiag.pod
@@ -1435,7 +1435,7 @@ goto, or a loop control statement.
 
 =item Exiting format via %s
 
-(W exiting) You are exiting an eval by unconventional means, such as a
+(W exiting) You are exiting a format by unconventional means, such as a
 goto, or a loop control statement.
 
 =item Exiting pseudo-block via %s