diff options
Diffstat (limited to 'test')
| -rw-r--r-- | test/lisp/net/tramp-tests.el | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el index 77b2c263ff8..a12e41a8822 100644 --- a/test/lisp/net/tramp-tests.el +++ b/test/lisp/net/tramp-tests.el | |||
| @@ -2394,7 +2394,10 @@ This checks also `file-name-as-directory', `file-name-directory', | |||
| 2394 | (when (and (tramp--test-expensive-test) (tramp--test-emacs26-p)) | 2394 | (when (and (tramp--test-expensive-test) (tramp--test-emacs26-p)) |
| 2395 | (should-error | 2395 | (should-error |
| 2396 | (copy-file source target) | 2396 | (copy-file source target) |
| 2397 | :type 'file-already-exists)) | 2397 | :type 'file-already-exists) |
| 2398 | (should-error | ||
| 2399 | (copy-file source target 'ok) | ||
| 2400 | :type 'file-error)) | ||
| 2398 | (copy-file source (file-name-as-directory target)) | 2401 | (copy-file source (file-name-as-directory target)) |
| 2399 | (should | 2402 | (should |
| 2400 | (file-exists-p | 2403 | (file-exists-p |
| @@ -2508,7 +2511,10 @@ This checks also `file-name-as-directory', `file-name-directory', | |||
| 2508 | (when (and (tramp--test-expensive-test) (tramp--test-emacs26-p)) | 2511 | (when (and (tramp--test-expensive-test) (tramp--test-emacs26-p)) |
| 2509 | (should-error | 2512 | (should-error |
| 2510 | (rename-file source target) | 2513 | (rename-file source target) |
| 2511 | :type 'file-already-exists)) | 2514 | :type 'file-already-exists) |
| 2515 | (should-error | ||
| 2516 | (rename-file source target 'ok) | ||
| 2517 | :type 'file-error)) | ||
| 2512 | (rename-file source (file-name-as-directory target)) | 2518 | (rename-file source (file-name-as-directory target)) |
| 2513 | (should-not (file-exists-p source)) | 2519 | (should-not (file-exists-p source)) |
| 2514 | (should | 2520 | (should |