This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Remove obsolete comment.
[perl5.git] / perl.c
diff --git a/perl.c b/perl.c
index ad9eaf2..411caea 100644 (file)
--- a/perl.c
+++ b/perl.c
@@ -3506,7 +3506,6 @@ S_init_main_stash(pTHX)
     sv_setpvn(get_sv("/", TRUE), "\n", 1);
 }
 
-/* PSz 18 Nov 03  fdscript now global but do not change prototype */
 STATIC int
 S_open_script(pTHX_ const char *scriptname, bool dosearch, SV *sv,
              int *suidscript)