- (let ((test (make-test 'was-run 'test-broken-method)))
- (run-test test (result self))
- (assert-equal "1 run, 0 errored, 1 failed"
- (summary (result self)))))
+ (assert-equal "1 run, 0 erred, 1 failed"
+ (summary (run-test
+ (make-test 'was-run 'test-broken-method)))))