Parent Directory | Revision Log | Patch
revision 1.22 by spiralvoice, Fri Jul 22 10:58:55 2005 UTC | revision 1.23 by spiralvoice, Mon Aug 8 16:47:30 2005 UTC | |
---|---|---|
# | Line 218 let shared_find num = | Line 218 let shared_find num = |
218 | let shared_iter f = | let shared_iter f = |
219 | H.iter f shareds_by_num | H.iter f shareds_by_num |
220 | ||
let local_dirname = Sys.getcwd () | ||
221 | (* Prevent sharing of temp directory to avoid sending incomplete files *) | (* Prevent sharing of temp directory to avoid sending incomplete files *) |
222 | let can_share dirname = | let can_share dirname = |
223 | Filename2.normalize dirname <> Filename2.normalize | Filename2.normalize dirname <> Filename2.normalize |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |