[jenkinscat-docs] master: Test results should be shown on the Jenkinscat front page. (5d6b74c)

[immanetize at fedoraproject.org]

Repository : http://git.fedorahosted.org/cgit/jenkinscat-docs.git

On branch  : master

>---------------------------------------------------------------

commit 5d6b74c1fa738107cc28cfbca862529c5ae9a83c
Author: Pavel Tisnovsky <ptisnovs at redhat.com>
Date:   Thu Jan 15 09:57:21 2015 +0100

    Test results should be shown on the Jenkinscat front page.


>---------------------------------------------------------------

 ChangeLog                 |    5 +++++
 src/jenkinscat/server.clj |   12 +++++++++++-
 2 files changed, 16 insertions(+), 1 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 7f1dc5c..5686117 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,6 +1,11 @@
 2015-01-15  Pavel Tisnovsky  <ptisnovs at redhat.com>
 
 	* src/jenkinscat/server.clj:
+	Test results should be shown on the Jenkinscat front page.
+
+2015-01-15  Pavel Tisnovsky  <ptisnovs at redhat.com>
+
+	* src/jenkinscat/server.clj:
 	Refactored out HTML rendering from the server module.
 
 2015-01-15  Pavel Tisnovsky  <ptisnovs at redhat.com>
diff --git a/src/jenkinscat/server.clj b/src/jenkinscat/server.clj
index b294d55..d350ba3 100644
--- a/src/jenkinscat/server.clj
+++ b/src/jenkinscat/server.clj
@@ -504,7 +504,13 @@
                     (let [last-build-and-duration (get-last-build-and-duration job-name)
                           last-build              (if last-build-and-duration (first last-build-and-duration) nil)
                           duration                (if last-build-and-duration (second last-build-and-duration) nil)
-                          path-to-log             (get-path-to-log job-name book-key)]
+                          path-to-log             (get-path-to-log job-name book-key)
+                          test-results            (try-to-read-test-results job-name)
+                          test-results-title      (nth test-results 0 "")
+                          test-results-passed     (nth test-results 1 "")
+                          test-results-failed     (nth test-results 2 "")
+                          test-results-url        (nth test-results 3 "")
+                          ]
                         (conj! books-for-product {
                             "name"                book-name
                             "repo"                book-repo
@@ -521,6 +527,10 @@
                             "product-name"        book-product
                             "show_overview"       show-overview
                             "book-product-name"   book-product-name
+                            "test-results-title"  test-results-title
+                            "test-results-passed" test-results-passed
+                            "test-results-failed" test-results-failed
+                            "test-results-url"    test-results-url
                         }))
                 )
             ))