/[mldonkey]/mldonkey/src/utils/lib/unix32.ml
ViewVC logotype

Diff of /mldonkey/src/utils/lib/unix32.ml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.45 by spiralvoice, Thu Oct 6 17:31:21 2005 UTC revision 1.46 by spiralvoice, Thu Oct 6 17:34:22 2005 UTC
# Line 149  module FDCache = struct Line 149  module FDCache = struct
149        close t;        close t;
150        (let d = (Filename.dirname (Filename.concat f file)) in        (let d = (Filename.dirname (Filename.concat f file)) in
151          Unix2.safe_mkdir d;          Unix2.safe_mkdir d;
152          Unix.chmod d (Misc.int_of_octal_string !create_dir_mask);    Unix2.chmod d (Misc.int_of_octal_string !create_dir_mask);
153          Unix2.can_write_to_directory d);          Unix2.can_write_to_directory d);
154        Unix2.rename t.filename (Filename.concat f file);        Unix2.rename t.filename (Filename.concat f file);
155        destroy t        destroy t

Legend:
Removed from v.1.45  
changed lines
  Added in v.1.46

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26