aboutsummaryrefslogtreecommitdiffstats
path: root/lib/observer/src/ttb.erl
diff options
context:
space:
mode:
authorPiotr Dorobisz <[email protected]>2011-03-09 13:14:34 +0100
committerHenrik Nord <[email protected]>2011-08-30 15:22:17 +0200
commit4eaa903c25d5fceb473013f4afb207a3fd82ab2e (patch)
treec29ffd5b7ca01004e0edc3382cfd30de0c8677b1 /lib/observer/src/ttb.erl
parentf5436f5c0c44e75777a7501944a166408a0702cd (diff)
downloadotp-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/observer/src/ttb.erl')
-rw-r--r--lib/observer/src/ttb.erl7
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 ->