cluster_search/commit

Additional debug messages.

diff --git a/lib/cluster_search/kwd_search.pl b/lib/cluster_search/kwd_search.pl
index 767bacd..df001fe 100644
--- a/lib/cluster_search/kwd_search.pl
+++ b/lib/cluster_search/kwd_search.pl
@@ -232,15 +232,13 @@ all_literals(Tokens, Literals) :-
 	compound_search_tokens(Tokens, Compounds, AllTokens),
 	list_to_and(AllTokens, LitCond),
 	rdf_find_literals(LitCond, Ls0),
+	debug(find_literals_detail, 'Matching literals ~p', [Ls0]),
 	(   Compounds == []
 	->  Literals = Ls0
 	;   tokenize_hits(Ls0, Tokenized),
 	    filter_compounds(Compounds, Tokenized, KeyedLiterals),
 	    pairs_values(KeyedLiterals, Literals)
-	),
-	debug(find_literals, 'Step1A: Porter stem Query.', []),
-	debug(find_literals, 'Step1B: Remove stop words.', []),
-	debug(find_literals, 'Step1C: Retrieve list of literals containing result 1B', []).
+	).
 
 %%	compound_search_tokens(+Tokens, -Compounds:list(list), -AllTokens)
 %