Parent Directory | Revision Log | Patch
revision 1.2 by spiralvoice, Mon Apr 4 19:36:46 2005 UTC | revision 1.3 by spiralvoice, Tue Sep 13 09:54:47 2005 UTC | |
---|---|---|
# | Line 607 let copy_ed2k_links sel () = | Line 607 let copy_ed2k_links sel () = |
607 | Ed2k md4 -> | Ed2k md4 -> |
608 | begin | begin |
609 | let link = Printf.sprintf "ed2k://|file|%s|%Ld|%s|" | let link = Printf.sprintf "ed2k://|file|%s|%Ld|%s|" |
610 | (Filename.basename s.shared_filename) | (Url.encode (Filename.basename s.shared_filename)) |
611 | s.shared_size | s.shared_size |
612 | (Md4.to_string md4) | (Md4.to_string md4) |
613 | in | in |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |