summaryrefslogtreecommitdiff
path: root/warnings.pl
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>2005-05-11 07:54:19 +0000
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2005-05-11 07:54:19 +0000
commit37442d52629699d89ef62d315d35efbc0facec21 (patch)
tree9a628dce9299a88717fc402055910fb432a0b326 /warnings.pl
parent24801a4b9a14a56208916a537c4c237993c25186 (diff)
downloadperl-37442d52629699d89ef62d315d35efbc0facec21.tar.gz
Include vim/emacs modelines in generated files to open them
in read-only mode. Make vi modelines compatible with non-vim vi versions. p4raw-id: //depot/perl@24445
Diffstat (limited to 'warnings.pl')
-rw-r--r--warnings.pl8
1 files changed, 5 insertions, 3 deletions
diff --git a/warnings.pl b/warnings.pl
index e7659b9374..e3c0403669 100644
--- a/warnings.pl
+++ b/warnings.pl
@@ -257,7 +257,8 @@ open(PM, ">lib/warnings.pm") || die "Can't create lib/warnings.pm: $!\n";
binmode PM;
print WARN <<'EOM' ;
-/* !!!!!!! DO NOT EDIT THIS FILE !!!!!!!
+/* -*- buffer-read-only: t -*-
+ !!!!!!! DO NOT EDIT THIS FILE !!!!!!!
This file is built by warnings.pl
Any changes made here will be lost!
*/
@@ -402,7 +403,7 @@ print WARN <<'EOM';
isWARNf_on(PL_curcop->cop_warnings, unpackWARN4(x))))
/* end of file warnings.h */
-
+/* ex: set ro: */
EOM
close WARN ;
@@ -465,10 +466,11 @@ while (<DATA>) {
print PM $_ ;
}
+print PM "# ex: set ro:\n";
close PM ;
__END__
-
+# -*- buffer-read-only: t -*-
# !!!!!!! DO NOT EDIT THIS FILE !!!!!!!
# This file was created by warnings.pl
# Any changes made here will be lost.