[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Mldonkey-commits] Changes to mldonkey/src/daemon/common/commonIndexing.
From: |
mldonkey-commits |
Subject: |
[Mldonkey-commits] Changes to mldonkey/src/daemon/common/commonIndexing.ml |
Date: |
Fri, 22 Jul 2005 10:32:22 -0400 |
Index: mldonkey/src/daemon/common/commonIndexing.ml
diff -u mldonkey/src/daemon/common/commonIndexing.ml:1.3
mldonkey/src/daemon/common/commonIndexing.ml:1.4
--- mldonkey/src/daemon/common/commonIndexing.ml:1.3 Tue May 17 13:18:05 2005
+++ mldonkey/src/daemon/common/commonIndexing.ml Fri Jul 22 14:32:12 2005
@@ -324,9 +324,9 @@
let docs = DocIndexer.query index req in
(* lprintf "%d results\n" (List.length docs); *)
Array.iter (fun doc ->
- if DocIndexer.filtered doc then begin
- lprintf "doc filtered\n";
- end else
+ if DocIndexer.filtered doc then
+ lprintf_nl "[cInd] doc filtered"
+ else
let r = Document.doc_value doc in
(* merge_result s doc.num; *)
(* lprintf "search_add_result: %d\n" r.result_num; *)
@@ -348,4 +348,3 @@
)
end
-
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Mldonkey-commits] Changes to mldonkey/src/daemon/common/commonIndexing.ml,
mldonkey-commits <=