[cage] Set emacs buffer-read-only analog to vim set ro #1034

Analog to vim ex: set ro: also set it up for emacs, if there's no special emacs coda with buffer-read-only:t at the end. Also touch tools/build/fixup_gen_file.pl since the library was updated.
parrot · Feb 25, 2014 · a9947f4 · a9947f4
1 parent 8661574
commit a9947f4
Show file tree

Hide file tree

Showing 6 changed files with 8 additions and 8 deletions.
diff --git a/compilers/imcc/imcc.l b/compilers/imcc/imcc.l
@@ -1,6 +1,6 @@
 %top{
 
-/* ex: set ro ft=c:
+/* ex: set ro ft=c: -*- buffer-read-only:t -*-
  * !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!!
  *
  * This file is generated automatically by the Parrot build process

diff --git a/config/gen/config_pm.pm b/config/gen/config_pm.pm
@@ -1,4 +1,4 @@
-# Copyright (C) 2001-2012, Parrot Foundation.
+# Copyright (C) 2001-2014, Parrot Foundation.
 
 =head1 NAME
 
@@ -107,7 +107,7 @@ sub runstep {
 
     my $pkg = __PACKAGE__;
     print {$OUT} <<"END";
-# ex: set ro:
+# ex: set ro: -*- buffer-read-only:t -*-
 # DO NOT EDIT THIS FILE
 # Generated by $pkg from $template
 
@@ -129,7 +129,7 @@ END
 
     open( $OUT, ">", $c_l_pir ) or die "Can't open $c_l_pir: $!";
     print {$OUT} <<"END";
-# ex: set ro:
+# ex: set ro: -*- buffer-read-only:t -*-
 # DO NOT EDIT THIS FILE
 # Generated by $pkg from $template and \%PConfig
 # This file should be the last thing run during

diff --git a/config/gen/config_pm/config_lib_pir.in b/config/gen/config_pm/config_lib_pir.in
@@ -1,4 +1,4 @@
-# Copyright (C) 2004-2012, Parrot Foundation.
+# Copyright (C) 2004-2014, Parrot Foundation.
 
 .include 'datatypes.pasm'
 .include 'parrot_version.pir'

diff --git a/lib/Parrot/BuildUtil.pm b/lib/Parrot/BuildUtil.pm
@@ -120,7 +120,7 @@ sub generated_file_header {
     $script =~ s/\\/\//g;
 
     my $header = <<"END_HEADER";
-/* ex: set ro ft=c:
+/* ex: set ro ft=c: -*- buffer-read-only:t -*-
  * !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!!
  *
  * This file is generated automatically from '$filename'

diff --git a/tools/build/c2str.pl b/tools/build/c2str.pl
@@ -100,7 +100,7 @@ sub process_cfile {
 
     my $line = 0;
     print <<"HEADER";
-/* ex: set ro:
+/* ex: set ro: -*- buffer-read-only:t -*-
  * !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!!
  *
  * This file is generated automatically from '$infile'

diff --git a/tools/build/fixup_gen_file.pl b/tools/build/fixup_gen_file.pl
@@ -1,5 +1,5 @@
 #! perl
-# Copyright (C) 2007, Parrot Foundation.
+# Copyright (C) 2007-2014, Parrot Foundation.
 
 =head1 NAME