PATCH: Add "Tcl" mode markers to *.test files for Emacs

Jacob Bachmeyer <[email protected]>
Newsgroups gmane.comp.sysutils.dejagnu.general
Message-ID <[email protected]>
I finally got tired of typing M-x tcl-mode when opening these files.  
Also, please run M-x whitespace-cleanup on the ChangeLog file; some 
"ghost spaces" have found their way in and they interfere with syntax 
highlighting on the affected lines.

----
ChangeLog entries:
----
	* testsuite/runtest.all/utils.test: Add Tcl mode marker for Emacs.
	* testsuite/runtest.all/target.test: Likewise.
	* testsuite/runtest.all/remote.test: Likewise.
	* testsuite/runtest.all/config.test: Likewise.
	* testsuite/runtest.all/clone_output.test: Likewise.
----
patch:
----
diff --git a/testsuite/runtest.all/clone_output.test b/testsuite/runtest.all/clone_output.test
index e1d1cd2..5daf872 100644
--- a/testsuite/runtest.all/clone_output.test
+++ b/testsuite/runtest.all/clone_output.test
@@ -1,4 +1,4 @@
-# test clone_output
+# test clone_output						-*- Tcl -*-
 
 set srcdir [lindex $argv 0]
 set subdir [lindex $argv 1]
diff --git a/testsuite/runtest.all/config.test b/testsuite/runtest.all/config.test
index 8153ecd..48999a7 100644
--- a/testsuite/runtest.all/config.test
+++ b/testsuite/runtest.all/config.test
@@ -1,4 +1,4 @@
-# test clone_output
+# test configuration support					-*- Tcl -*-
 
 set srcdir [lindex $argv 0]
 set subdir [lindex $argv 1]
diff --git a/testsuite/runtest.all/remote.test b/testsuite/runtest.all/remote.test
index 1f010b5..4f10ee1 100644
--- a/testsuite/runtest.all/remote.test
+++ b/testsuite/runtest.all/remote.test
@@ -1,3 +1,5 @@
+# Test procedures in lib/remote.exp.				-*- Tcl -*-
+
 set srcdir [lindex $argv 0]
 set subdir [lindex $argv 1]
 set objdir [lindex $argv 2]
diff --git a/testsuite/runtest.all/target.test b/testsuite/runtest.all/target.test
index 74ccd71..a9d8853 100644
--- a/testsuite/runtest.all/target.test
+++ b/testsuite/runtest.all/target.test
@@ -1,3 +1,5 @@
+# Test procedures in lib/target.exp.				-*- Tcl -*-
+
 set srcdir [lindex $argv 0]
 set subdir [lindex $argv 1]
 set objdir [lindex $argv 2]
diff --git a/testsuite/runtest.all/utils.test b/testsuite/runtest.all/utils.test
index 743933b..254e2dc 100644
--- a/testsuite/runtest.all/utils.test
+++ b/testsuite/runtest.all/utils.test
@@ -1,4 +1,4 @@
-# Test procedures in lib/utils.exp.
+# Test procedures in lib/utils.exp.				-*- Tcl -*-
 
 set srcdir [lindex $argv 0]
 set subdir [lindex $argv 1]
----


-- Jacob
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.