Skip to content

Commit

Permalink
minor
Browse files Browse the repository at this point in the history
  • Loading branch information
oakmac committed Aug 13, 2016
1 parent f17844e commit d8a2766
Showing 1 changed file with 3 additions and 3 deletions.
6 changes: 3 additions & 3 deletions test.el
Expand Up @@ -121,14 +121,14 @@
;; in/out text equality
(when (not (equal out-text-1 expected-text))
(setq failed? t)
(print-err (concat mode-string " In/Out text failure: test id " test-id)))
(print-err (concat mode-string " In/Out Text failure: test id " test-id)))

;; check cursor-x
(when (and in-cursor
(not (equal (plist-get result-1 :cursor-x)
(plist-get out-cursor :cursorX))))
(setq failed? t)
(print-err (concat mode-string " cursorX In/Out failure: test id " test-id)))
(print-err (concat mode-string " cursorX failure: test id " test-id)))

;; check error output
(when out-error
Expand Down Expand Up @@ -161,7 +161,7 @@
(out-text-3 (plist-get result-3 :text)))
(when (not (equal out-text-3 expected-text))
(setq failed? t)
(print-err (concat mode-string " cross-mode preservation: test id " test-id)))))
(print-err (concat mode-string " Cross-mode Preservation failure: test id " test-id)))))

;; increment the test counts
(setq num-tests-ran (1+ num-tests-ran))
Expand Down

0 comments on commit d8a2766

Please sign in to comment.