diff options
| author | Joakim Verona | 2013-02-14 00:04:38 +0100 |
|---|---|---|
| committer | Joakim Verona | 2013-02-14 00:04:38 +0100 |
| commit | 694d759a9dd8fcbd23078bab33f84ff399d58971 (patch) | |
| tree | 7b9f2b697ffa06f315be78cd84b94d84659d02c2 /test | |
| parent | e46029ad6dda065541c8de40de0fe9d5800ac770 (diff) | |
| parent | fe3362617385f936576ba0acdac66e2f7da38391 (diff) | |
| download | emacs-694d759a9dd8fcbd23078bab33f84ff399d58971.tar.gz emacs-694d759a9dd8fcbd23078bab33f84ff399d58971.zip | |
auto upstream
Diffstat (limited to 'test')
| -rw-r--r-- | test/ChangeLog | 5 | ||||
| -rw-r--r-- | test/automated/ruby-mode-tests.el | 18 |
2 files changed, 23 insertions, 0 deletions
diff --git a/test/ChangeLog b/test/ChangeLog index 41bb1be190e..f508209008e 100644 --- a/test/ChangeLog +++ b/test/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2013-02-13 Dmitry Gutov <dgutov@yandex.ru> | ||
| 2 | |||
| 3 | * automated/ruby-mode-tests.el | ||
| 4 | (ruby-move-to-block-skips-percent-literal): New test. | ||
| 5 | |||
| 1 | 2013-02-04 Chong Yidong <cyd@gnu.org> | 6 | 2013-02-04 Chong Yidong <cyd@gnu.org> |
| 2 | 7 | ||
| 3 | * automated/thingatpt.el: New file. | 8 | * automated/thingatpt.el: New file. |
diff --git a/test/automated/ruby-mode-tests.el b/test/automated/ruby-mode-tests.el index 2028c6fad00..6798a49d53c 100644 --- a/test/automated/ruby-mode-tests.el +++ b/test/automated/ruby-mode-tests.el | |||
| @@ -445,6 +445,24 @@ VALUES-PLIST is a list with alternating index and value elements." | |||
| 445 | (ruby-move-to-block -2) | 445 | (ruby-move-to-block -2) |
| 446 | (should (= 2 (line-number-at-pos)))) | 446 | (should (= 2 (line-number-at-pos)))) |
| 447 | 447 | ||
| 448 | (ert-deftest ruby-move-to-block-skips-percent-literal () | ||
| 449 | (dolist (s (list (ruby-test-string | ||
| 450 | "foo do | ||
| 451 | | a = %%w( | ||
| 452 | | ) | ||
| 453 | |end") | ||
| 454 | (ruby-test-string | ||
| 455 | "foo do | ||
| 456 | | a = %%w| | ||
| 457 | | | | ||
| 458 | |end"))) | ||
| 459 | (ruby-with-temp-buffer s | ||
| 460 | (goto-line 1) | ||
| 461 | (ruby-end-of-block) | ||
| 462 | (should (= 4 (line-number-at-pos))) | ||
| 463 | (ruby-beginning-of-block) | ||
| 464 | (should (= 1 (line-number-at-pos)))))) | ||
| 465 | |||
| 448 | (provide 'ruby-mode-tests) | 466 | (provide 'ruby-mode-tests) |
| 449 | 467 | ||
| 450 | ;;; ruby-mode-tests.el ends here | 468 | ;;; ruby-mode-tests.el ends here |