diff options
author | Piotr Dorobisz <[email protected]> | 2011-03-09 13:14:34 +0100 |
---|---|---|
committer | Henrik Nord <[email protected]> | 2011-08-30 15:22:17 +0200 |
commit | 4eaa903c25d5fceb473013f4afb207a3fd82ab2e (patch) | |
tree | c29ffd5b7ca01004e0edc3382cfd30de0c8677b1 /lib | |
parent | f5436f5c0c44e75777a7501944a166408a0702cd (diff) | |
download | otp-4eaa903c25d5fceb473013f4afb207a3fd82ab2e.tar.gz otp-4eaa903c25d5fceb473013f4afb207a3fd82ab2e.tar.bz2 otp-4eaa903c25d5fceb473013f4afb207a3fd82ab2e.zip |
BUGFIX Fetch fails when nodes on the same host have different cwd
Diffstat (limited to 'lib')
-rw-r--r-- | lib/observer/src/ttb.erl | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/lib/observer/src/ttb.erl b/lib/observer/src/ttb.erl index 2498be150d..66b8d049d1 100644 --- a/lib/observer/src/ttb.erl +++ b/lib/observer/src/ttb.erl @@ -668,8 +668,11 @@ fetch(Localhost,Dir,Node,MetaFile) -> Files = get_filenames(Node,MetaFile), lists:foreach( fun(File0) -> - File = filename:join(Dir,filename:basename(File0)), - file:rename(File0,File) + %%Other nodes may still have different CWD + {ok, Cwd} = rpc:call(Node, file, get_cwd, []), + File1 = filename:join(Cwd, File0), + File = filename:join(Dir,filename:basename(File1)), + file:rename(File1,File) end, Files); false -> |