diff options
| author | Štěpán Němec | 2020-03-01 18:50:14 +0100 |
|---|---|---|
| committer | Štěpán Němec | 2020-04-18 17:10:02 +0200 |
| commit | 067b0705986572e42687334c4eaf32988f22f680 (patch) | |
| tree | 70129d8ec8e109cb64f895e462298adf2c2636e8 /test | |
| parent | f3b62b6c62c41d2e5d15418ea940bce6b11bdf7d (diff) | |
| download | emacs-067b0705986572e42687334c4eaf32988f22f680.tar.gz emacs-067b0705986572e42687334c4eaf32988f22f680.zip | |
; Fix some typos and doc issues (bug#40695)
Diffstat (limited to 'test')
| -rw-r--r-- | test/lisp/jsonrpc-tests.el | 4 | ||||
| -rw-r--r-- | test/src/thread-tests.el | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/test/lisp/jsonrpc-tests.el b/test/lisp/jsonrpc-tests.el index 63c4c32d45f..6c08023d4f3 100644 --- a/test/lisp/jsonrpc-tests.el +++ b/test/lisp/jsonrpc-tests.el | |||
| @@ -114,7 +114,7 @@ | |||
| 114 | (condition-case err | 114 | (condition-case err |
| 115 | (progn | 115 | (progn |
| 116 | (jsonrpc-request conn 'delete-directory "~/tmp") | 116 | (jsonrpc-request conn 'delete-directory "~/tmp") |
| 117 | (ert-fail "A `jsonrpc-error' should have been signalled!")) | 117 | (ert-fail "A `jsonrpc-error' should have been signaled!")) |
| 118 | (jsonrpc-error | 118 | (jsonrpc-error |
| 119 | (should (= -32601 (cdr (assoc 'jsonrpc-error-code (cdr err))))))))) | 119 | (should (= -32601 (cdr (assoc 'jsonrpc-error-code (cdr err))))))))) |
| 120 | 120 | ||
| @@ -124,7 +124,7 @@ | |||
| 124 | (condition-case err | 124 | (condition-case err |
| 125 | (progn | 125 | (progn |
| 126 | (jsonrpc-request conn '+ ["a" 2]) | 126 | (jsonrpc-request conn '+ ["a" 2]) |
| 127 | (ert-fail "A `jsonrpc-error' should have been signalled!")) | 127 | (ert-fail "A `jsonrpc-error' should have been signaled!")) |
| 128 | (jsonrpc-error | 128 | (jsonrpc-error |
| 129 | (should (= -32603 (cdr (assoc 'jsonrpc-error-code (cdr err))))))))) | 129 | (should (= -32603 (cdr (assoc 'jsonrpc-error-code (cdr err))))))))) |
| 130 | 130 | ||
diff --git a/test/src/thread-tests.el b/test/src/thread-tests.el index 6673ac4b4eb..5d85fc74e50 100644 --- a/test/src/thread-tests.el +++ b/test/src/thread-tests.el | |||
| @@ -112,7 +112,7 @@ | |||
| 112 | (should-error (thread-join (current-thread)))) | 112 | (should-error (thread-join (current-thread)))) |
| 113 | 113 | ||
| 114 | (ert-deftest threads-join-error () | 114 | (ert-deftest threads-join-error () |
| 115 | "Test of error signalling from `thread-join'." | 115 | "Test of error signaling from `thread-join'." |
| 116 | :tags '(:unstable) | 116 | :tags '(:unstable) |
| 117 | (skip-unless (featurep 'threads)) | 117 | (skip-unless (featurep 'threads)) |
| 118 | (let ((thread (make-thread #'threads-call-error))) | 118 | (let ((thread (make-thread #'threads-call-error))) |