diff options
Diffstat (limited to 'test/lisp/net')
| -rw-r--r-- | test/lisp/net/tramp-tests.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el index 28d773ca616..265821ed439 100644 --- a/test/lisp/net/tramp-tests.el +++ b/test/lisp/net/tramp-tests.el | |||
| @@ -192,7 +192,7 @@ The temporary file is not created." | |||
| 192 | (: "Making symbolic link" | 192 | (: "Making symbolic link" |
| 193 | (? ":") " Operation not permitted"))) | 193 | (? ":") " Operation not permitted"))) |
| 194 | (error-message-string err)) | 194 | (error-message-string err)) |
| 195 | (signal (car err) (cdr err)))))) | 195 | (signal err))))) |
| 196 | 196 | ||
| 197 | ;; Don't print messages in nested `tramp--test-instrument-test-case' calls. | 197 | ;; Don't print messages in nested `tramp--test-instrument-test-case' calls. |
| 198 | (defvar tramp--test-instrument-test-case-p nil | 198 | (defvar tramp--test-instrument-test-case-p nil |
| @@ -4290,7 +4290,7 @@ This tests also `file-executable-p', `file-writable-p' and `set-file-modes'." | |||
| 4290 | (file-error | 4290 | (file-error |
| 4291 | (unless (string-prefix-p "error with add-name-to-file" | 4291 | (unless (string-prefix-p "error with add-name-to-file" |
| 4292 | (error-message-string err)) | 4292 | (error-message-string err)) |
| 4293 | (signal (car err) (cdr err)))))) | 4293 | (signal err))))) |
| 4294 | 4294 | ||
| 4295 | (ert-deftest tramp-test21-file-links () | 4295 | (ert-deftest tramp-test21-file-links () |
| 4296 | "Check `file-symlink-p'. | 4296 | "Check `file-symlink-p'. |