diff options
| author | Hans Nilsson <[email protected]> | 2014-11-10 17:09:25 +0100 |
|---|---|---|
| committer | Hans Nilsson <[email protected]> | 2014-11-18 14:48:16 +0100 |
| commit | b2171f6bf65c5897d37103afec102fa565bc134e (patch) | |
| tree | 8968f14919aec0e2c3e4008079ca27a17924bb9f /lib/stdlib/test/tar_SUITE.erl | |
| parent | 9366932892711cc4cce7a54b1e098e6d5c3db468 (diff) | |
| download | otp-b2171f6bf65c5897d37103afec102fa565bc134e.tar.gz otp-b2171f6bf65c5897d37103afec102fa565bc134e.tar.bz2 otp-b2171f6bf65c5897d37103afec102fa565bc134e.zip | |
erl_tar: Extend api to define own storage media access functions.
The reason for this is a requirement on enabling ssh_sftp to write a tar file on the server.
This new api function is used by ssh_sftp:open_tar/3,4.
Diffstat (limited to 'lib/stdlib/test/tar_SUITE.erl')
| -rw-r--r-- | lib/stdlib/test/tar_SUITE.erl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/stdlib/test/tar_SUITE.erl b/lib/stdlib/test/tar_SUITE.erl index 6349139925..9b6d65011e 100644 --- a/lib/stdlib/test/tar_SUITE.erl +++ b/lib/stdlib/test/tar_SUITE.erl @@ -654,6 +654,7 @@ open_add_close(Config) when is_list(Config) -> ?line ok = erl_tar:add(AD, FileOne, []), ?line ok = erl_tar:add(AD, FileTwo, "second file", []), ?line ok = erl_tar:add(AD, FileThree, [verbose]), + ?line ok = erl_tar:add(AD, FileThree, "chunked", [{chunks,11411},verbose]), ?line ok = erl_tar:add(AD, ADir, [verbose]), ?line ok = erl_tar:add(AD, AnotherDir, [verbose]), ?line ok = erl_tar:close(AD), @@ -661,7 +662,7 @@ open_add_close(Config) when is_list(Config) -> ?line ok = erl_tar:t(TarOne), ?line ok = erl_tar:tt(TarOne), - ?line {ok,[FileOne,"second file",FileThree,ADir,SomeContent]} = erl_tar:table(TarOne), + ?line {ok,[FileOne,"second file",FileThree,"chunked",ADir,SomeContent]} = erl_tar:table(TarOne), ?line delete_files(["oac_file","oac_small","oac_big",Dir,AnotherDir,ADir]), |