diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-05-11 07:54:19 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-05-11 07:54:19 +0000 |
| commit | 37442d52629699d89ef62d315d35efbc0facec21 (patch) | |
| tree | 9a628dce9299a88717fc402055910fb432a0b326 /keywords.pl | |
| parent | 24801a4b9a14a56208916a537c4c237993c25186 (diff) | |
| download | perl-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 'keywords.pl')
| -rwxr-xr-x | keywords.pl | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/keywords.pl b/keywords.pl index b4b048b08a..fe745d470b 100755 --- a/keywords.pl +++ b/keywords.pl @@ -7,7 +7,8 @@ binmode KW; select KW; print <<EOM; -/* +/* -*- buffer-read-only: t -*- + * * keywords.h * * Copyright (C) 1994, 1995, 1996, 1997, 1999, 2000, 2001, 2002, @@ -33,6 +34,8 @@ while (<DATA>) { print &tab(5, "#define KEY_$keyword"), $keynum++, "\n"; } +print KW "\n/* ex: set ro: */\n"; + close KW or die "Error closing keywords.h: $!"; ########################################################################### |