diff options
Diffstat (limited to 'test/src')
| -rw-r--r-- | test/src/process-tests.el | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/test/src/process-tests.el b/test/src/process-tests.el index 0bb7ebe50a8..b853f77946d 100644 --- a/test/src/process-tests.el +++ b/test/src/process-tests.el | |||
| @@ -284,5 +284,14 @@ file name handler." | |||
| 284 | (put #'process-tests--file-handler 'operations | 284 | (put #'process-tests--file-handler 'operations |
| 285 | '(unhandled-file-name-directory make-process)) | 285 | '(unhandled-file-name-directory make-process)) |
| 286 | 286 | ||
| 287 | (ert-deftest make-process/stop () | ||
| 288 | "Check that `make-process' doesn't accept a `:stop' key. | ||
| 289 | See Bug#30460." | ||
| 290 | (should-error | ||
| 291 | (make-process :name "test" | ||
| 292 | :command (list (expand-file-name invocation-name | ||
| 293 | invocation-directory)) | ||
| 294 | :stop t))) | ||
| 295 | |||
| 287 | (provide 'process-tests) | 296 | (provide 'process-tests) |
| 288 | ;; process-tests.el ends here. | 297 | ;; process-tests.el ends here. |