Return info about relevance score

[pazpar2-moved-to-github.git] / src / http_command.c

diff --git a/src/http_command.c b/src/http_command.c
index 2097eee..1cb1ae8 100644 (file)
--- a/src/http_command.c
+++ b/src/http_command.c
@@ -1137,8 +1137,14 @@ static void show_records(struct http_channel *c, struct http_session *s, int act
         if (ccount > 1)
             wrbuf_printf(c->wrbuf, "<count>%d</count>\n", ccount);
        if (strstr(sort, "relevance"))
+        {
            wrbuf_printf(c->wrbuf, "<relevance>%d</relevance>\n",
                          rec->relevance_score);
+            wrbuf_printf(c->wrbuf, "<relevance_info>\n");
+            wrbuf_xmlputs(c->wrbuf, wrbuf_cstr(rec->relevance_explain1));
+            wrbuf_xmlputs(c->wrbuf, wrbuf_cstr(rec->relevance_explain2));
+           wrbuf_printf(c->wrbuf, "</relevance_info>\n");
+        }
         wrbuf_puts(c->wrbuf, "<recid>");
         wrbuf_xmlputs(c->wrbuf, rec->recid);
         wrbuf_puts(c->wrbuf, "</recid>\n");