From a324b8c791b5de887168ca14cff86722bdb73d20 Mon Sep 17 00:00:00 2001 From: Dmitry Gutov Date: Mon, 28 Jan 2013 05:20:42 +0400 Subject: [PATCH] * progmodes/ruby-mode.el (ruby-move-to-block): Work with (maybe temporarily) broken indentation. * automated/ruby-mode-tests.el (ruby-block-test-example): Break indentation of the do block opener and add a line inside it. * automated/ruby-mode-tests.el (works-on-do, ok-with-three): Adjust line numbers. --- lisp/ChangeLog | 2 ++ lisp/progmodes/ruby-mode.el | 2 +- test/ChangeLog | 4 ++++ test/automated/ruby-mode-tests.el | 7 ++++--- 4 files changed, 11 insertions(+), 4 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index cc30dc82341..7b37b3d21b3 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -2,6 +2,8 @@ * progmodes/ruby-mode.el (ruby-font-lock-keywords): Remove some checks made superfluous by the \_< operator. + * progmodes/ruby-mode.el (ruby-move-to-block): Work with (maybe + temporarily) broken indentation. 2013-01-27 Nobuyoshi Nakada diff --git a/lisp/progmodes/ruby-mode.el b/lisp/progmodes/ruby-mode.el index 989c00365a0..2c8a5ee4a13 100644 --- a/lisp/progmodes/ruby-mode.el +++ b/lisp/progmodes/ruby-mode.el @@ -905,7 +905,7 @@ current block, a sibling block, or an outer block. Do that (abs N) times." ((and backward (looking-at "^=end\\>")) (re-search-backward "^=begin\\>")) (t - (setq pos (current-indentation)) + (setq pos (ruby-calculate-indent)) (cond ;; Deeper indentation, we found a block. ;; FIXME: We can't recognize empty blocks this way. diff --git a/test/ChangeLog b/test/ChangeLog index 505ac398e2f..7e893ba6768 100644 --- a/test/ChangeLog +++ b/test/ChangeLog @@ -2,6 +2,10 @@ * automated/ruby-mode-tests.el (ruby-indent-spread-args-in-parens): New test. + * automated/ruby-mode-tests.el (ruby-block-test-example): + Break indentation of the do block opener and add a line inside it. + * automated/ruby-mode-tests.el (works-on-do, ok-with-three): + Adjust line numbers. 2013-01-15 Stefan Monnier diff --git a/test/automated/ruby-mode-tests.el b/test/automated/ruby-mode-tests.el index 42c59a1f3f0..2028c6fad00 100644 --- a/test/automated/ruby-mode-tests.el +++ b/test/automated/ruby-mode-tests.el @@ -408,7 +408,8 @@ VALUES-PLIST is a list with alternating index and value elements." | end | | def baz - | some do + |some do + |3 | end | end |end")) @@ -425,7 +426,7 @@ VALUES-PLIST is a list with alternating index and value elements." (ruby-deftest-move-to-block works-on-do (goto-line 11) (ruby-end-of-block) - (should (= 12 (line-number-at-pos))) + (should (= 13 (line-number-at-pos))) (ruby-beginning-of-block) (should (= 11 (line-number-at-pos)))) @@ -437,7 +438,7 @@ VALUES-PLIST is a list with alternating index and value elements." (ruby-deftest-move-to-block ok-with-three (goto-line 2) (ruby-move-to-block 3) - (should (= 13 (line-number-at-pos)))) + (should (= 14 (line-number-at-pos)))) (ruby-deftest-move-to-block ok-with-minus-two (goto-line 10) -- 2.39.2