106 |
let file_id = Filename.basename temp_name in |
let file_id = Filename.basename temp_name in |
107 |
let size = Int64.to_string (file_size file) in |
let size = Int64.to_string (file_size file) in |
108 |
let duration = |
let duration = |
109 |
Date.time_to_string_long ((BasicSocket.last_time ()) - info.G.file_age) |
string_of_int ((BasicSocket.last_time ()) - info.G.file_age) |
110 |
in |
in |
111 |
let network = network_find_by_num info.G.file_network in |
let network = network_find_by_num info.G.file_network in |
112 |
let filename = Filename.basename new_name in |
let filename = Filename.basename new_name in |