summaryrefslogtreecommitdiff
path: root/test/automated/ruby-mode-tests.el
diff options
context:
space:
mode:
Diffstat (limited to 'test/automated/ruby-mode-tests.el')
-rw-r--r--test/automated/ruby-mode-tests.el19
1 files changed, 9 insertions, 10 deletions
diff --git a/test/automated/ruby-mode-tests.el b/test/automated/ruby-mode-tests.el
index 86b123f9b14..dafe393377b 100644
--- a/test/automated/ruby-mode-tests.el
+++ b/test/automated/ruby-mode-tests.el
@@ -24,10 +24,17 @@
(require 'ert)
(require 'ruby-mode)
+(defmacro ruby-with-temp-buffer (contents &rest body)
+ (declare (indent 1) (debug t))
+ `(with-temp-buffer
+ (insert ,contents)
+ (ruby-mode)
+ ,@body))
+
(defun ruby-should-indent (content column)
"Assert indentation COLUMN on the last line of CONTENT."
(ruby-with-temp-buffer content
- (ruby-indent-line)
+ (indent-according-to-mode)
(should (= (current-indentation) column))))
(defun ruby-should-indent-buffer (expected content)
@@ -38,13 +45,6 @@ The whitespace before and including \"|\" on each line is removed."
(indent-region (point-min) (point-max))
(should (string= (ruby-test-string expected) (buffer-string)))))
-(defmacro ruby-with-temp-buffer (contents &rest body)
- (declare (indent 1) (debug t))
- `(with-temp-buffer
- (insert ,contents)
- (ruby-mode)
- ,@body))
-
(defun ruby-test-string (s &rest args)
(apply 'format (replace-regexp-in-string "^[ \t]*|" "" s) args))
@@ -471,6 +471,7 @@ VALUES-PLIST is a list with alternating index and value elements."
|end"))
(defmacro ruby-deftest-move-to-block (name &rest body)
+ (declare (indent defun))
`(ert-deftest ,(intern (format "ruby-move-to-block-%s" name)) ()
(with-temp-buffer
(insert ruby-block-test-example)
@@ -478,8 +479,6 @@ VALUES-PLIST is a list with alternating index and value elements."
(goto-char (point-min))
,@body)))
-(put 'ruby-deftest-move-to-block 'lisp-indent-function 'defun)
-
(ruby-deftest-move-to-block works-on-do
(forward-line 10)
(ruby-end-of-block)