diff options
author | David Barksdale <amatus@amatus.name> | 2014-12-13 21:03:24 -0600 |
---|---|---|
committer | David Barksdale <amatus@amatus.name> | 2014-12-13 21:03:24 -0600 |
commit | 7b52db39e8ce741908126d5ca4cadf69e09d2f8b (patch) | |
tree | c1d8f3b292a9ce00d69f111d7f0a58d90dbcc8ed /src/cljs/gnunet_web/filesharing.cljs | |
parent | 9e4859419263f76e4c4f694818966ce30167a62c (diff) |
Add a file size column to search results
Diffstat (limited to 'src/cljs/gnunet_web/filesharing.cljs')
-rw-r--r-- | src/cljs/gnunet_web/filesharing.cljs | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/cljs/gnunet_web/filesharing.cljs b/src/cljs/gnunet_web/filesharing.cljs index c0cb288..65caf1f 100644 --- a/src/cljs/gnunet_web/filesharing.cljs +++ b/src/cljs/gnunet_web/filesharing.cljs @@ -269,3 +269,9 @@ :ch ch :callback-key callback-key})) +(defn uri-to-file-size + [uri] + (let [uri-pointer (string-to-uri-pointer uri) + file-size (js/_GNUNET_FS_uri_chk_get_file_size2 uri-pointer)] + (js/_GNUNET_FS_uri_destroy uri-pointer) + file-size)) |