.pm indicates a p6 file. add a hint for vim

src/ARE/Actions.pm

@@ -105,3 +105,4 @@ sub buildsub($rpast, $block = PAST::Block.new() ) {
     $block;
 }
 
+# vim: filetype=perl6:

src/ARE/Compiler.pm

@@ -6,4 +6,4 @@ class ARE::Compiler is HLL::Compiler {
     }
 }
 
-
+# vim: filetype=perl6:

src/ARE/Grammar.pm

@@ -44,3 +44,4 @@ token metachar:sym<[> {
 proto token backslash { <...> }
 token backslash:sym<w> { $<sym>=[<[dswDSW]>] }
 
+# vim: filetype=perl6:

src/Partcl/Actions.pm

@@ -166,4 +166,4 @@ method term:sym<integer>($/) { make $<integer>.ast; }
 method term:sym<[ ]>($/) { make $<script>.ast; }
 method term:sym<" ">($/)  { make concat_atoms($<quoted_atom>); }
 
-
+# vim: filetype=perl6:

src/Partcl/Compiler.pm

@@ -5,3 +5,5 @@ INIT {
     Partcl::Compiler.parsegrammar(Partcl::Grammar);
     Partcl::Compiler.parseactions(Partcl::Actions);
 }
+
+# vim: filetype=perl6:

src/Partcl/Grammar.pm

@@ -119,3 +119,5 @@ token infix:sym<!=> { <sym> <O('%equality_numeric, :pirop<isne Inn>')> }
 
 token infix:sym<eq> { <sym> <O('%equality_string, :pirop<iseq Iss>')> }
 token infix:sym<ne> { <sym> <O('%equality_string, :pirop<isne Iss>')> }
+
+# vim: filetype=perl6:

src/Partcl/commands/info.pm

@@ -66,3 +66,5 @@ our sub info(*@args) {
     # invalid subcommand.
     error("unknown or ambiguous subcommand \"$cmd\": must be args, body, cmdcount, commands, complete, default, exists, frame, functions, globals, hostname, level, library, loaded, locals, nameofexecutable, patchlevel, procs, script, sharedlibextension, tclversion, or vars");
 }
+
+# vim: filetype=perl6:

src/Partcl/commands/main.pm

@@ -506,4 +506,4 @@ our sub EXPAND($args) {
     Partcl::Grammar.parse($args, :rule<list>, :actions(Partcl::Actions) ).ast;
 }
 
-# vim: ft=perl6:
+# vim: filetype=perl6:

src/Partcl/commands/namespace.pm

@@ -47,3 +47,5 @@ our sub namespace(*@args) {
     # invalid subcommand.
     error("bad option \"$cmd\": must be children, code, current, delete, ensemble, eval, exists, export, forget, import, inscope, origin, parent, path, qualifiers, tail, unknown, upvar, or which");
 }
+
+# vim: filetype=perl6:

src/Partcl/commands/package.pm

@@ -39,3 +39,5 @@ our sub package(*@args) {
     # invalid subcommand.
     error("bad option \"$cmd\": must be forget, ifneeded, names, prefer, present, provide, require, unknown, vcompare, versions, or vsatisfies");
 }
+
+# vim: filetype=perl6:

src/Partcl/commands/string.pm

@@ -129,3 +129,5 @@ module _tcl {
         };
     }
 }
+
+# vim: filetype=perl6:

src/TclLexPad.pm

@@ -12,3 +12,5 @@ class TclLexPad is Hash {
     method depth() { $!depth }
     method outer() { $!outer }
 }
+
+# vim: filetype=perl6:

src/init.pm

@@ -19,3 +19,5 @@ sub _getChannel($name) {
     $ioObj // error("can not find channel named \"$name\"");
     return $ioObj;
 }
+
+# vim: filetype=perl6:

src/options.pm

@@ -1,5 +1,3 @@
-# vim: filetype=perl6:
-
 module _tcl {
 
 =begin head1 select_option
@@ -262,3 +260,4 @@ sub optionsToString(@options) {
 
 }
 
+# vim: filetype=perl6: