* test/indent/octave.m: Add a test to ensure indentation is local.

diff --git a/test/ChangeLog b/test/ChangeLog
index 3808012c2985bc351ae6effadba7a2a2cac8ad68..5a5c202ad3c53358cb57e0eed00594fc7c9bb514 100644 (file)
--- a/test/ChangeLog
+++ b/test/ChangeLog
@@ -1,8 +1,12 @@
+2010-10-27  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * indent/octave.m: Add a test to ensure indentation is local.
+
 2010-10-23  Glenn Morris  <rgm@gnu.org>
 
        * comint-testsuite.el
-       (comint-testsuite--test-comint-password-prompt-regexp): Add
-       "Please enter the password".  (Bug#7224)
+       (comint-testsuite--test-comint-password-prompt-regexp):
+       Add "Please enter the password".  (Bug#7224)
 
 2010-09-20  Stefan Monnier  <monnier@iro.umontreal.ca>
 

diff --git a/test/indent/octave.m b/test/indent/octave.m
index dc6f84481525564c5fed425a9f49175c08561ca2..768f3d85e01a44860c25fe3d3f0c50a236c1c053 100644 (file)
--- a/test/indent/octave.m
+++ b/test/indent/octave.m
@@ -17,15 +17,21 @@ function res = tcomp (fn)
   cnty = repmat(x(:,1)(:), 10, 1);
 
   pop = x(:,1:10)(:);
-  bir = x(:,11:20)(:);
-  dth = x(:,21:30)(:);
-  imig = x(:,31:40)(:);
-  dmig = x(:,41:50)(:);
-  gq = x(:,51:60)(:);
-  
-  yrs = repmat(2000:2009, 39, 1)(:);
-
-  res = [yrs, cnty, pop, bir, dth, imig, dmig, gq];
+    ## Here and below, we test if the indentation aligns with a previous
+    ## fixindented line.  This is important so as to make it easier for the
+    ## user to verride some indentation somewhere, and also because it
+    ## reflects the fact that the indentation decision is taken with a minimum
+    ## amount of work (i.e. in the present case, without having to walk back
+    ## until the `function' line).
+    bir = x(:,11:20)(:);        # fixindent
+    dth = x(:,21:30)(:);
+    imig = x(:,31:40)(:);
+    dmig = x(:,41:50)(:);
+    gq = x(:,51:60)(:);
+
+    yrs = repmat(2000:2009, 39, 1)(:);
+
+    res = [yrs, cnty, pop, bir, dth, imig, dmig, gq];
 
 endfunction