procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix for bad test in ruby-mode-tests.el.

Browse source 
* automated/ruby-mode-tests.el (ruby-add-log-current-method-examples):
Don't use loop macro, to allow automated testing to work.
This commit is contained in:
Chong Yidong 2012-12-02 14:06:32 +08:00
parent 1cbaa705e7
commit 89eb3b0ae7
2 changed files with 18 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
test/ChangeLog
View file

@ -1,3 +1,9 @@
2012-12-02 Chong Yidong <cyd@gnu.org>
* automated/ruby-mode-tests.el
(ruby-add-log-current-method-examples): Don't use loop macro, to
allow automated testing to work.
2012-11-20 Stefan Monnier <monnier@iro.umontreal.ca>
* automated/advice-tests.el (advice-tests--data): Remove.

22
test/automated/ruby-mode-tests.el
View file

@ -296,21 +296,23 @@ VALUES-PLIST is a list with alternating index and value elements."
(let ((pairs '(("foo" . "#foo")
("C.foo" . ".foo")
("self.foo" . ".foo"))))
(loop for (name . value) in pairs
do (with-temp-buffer
(insert (ruby-test-string
"module M
(dolist (pair pairs)
(let ((name (car pair))
(value (cdr pair)))
(with-temp-buffer
(insert (ruby-test-string
"module M
| class C
| def %s
| end
| end
|end"
name))
(ruby-mode)
(search-backward "def")
(forward-line)
(should (string= (ruby-add-log-current-method)
(format "M::C%s" value)))))))
name))
(ruby-mode)
(search-backward "def")
(forward-line)
(should (string= (ruby-add-log-current-method)
(format "M::C%s" value))))))))
(defvar ruby-block-test-example
(ruby-test-string