               :else [:div.alert.iconified {:class (if build-succeeded? "alert-info" "alert-danger")}
                      [:div [:img.alert-icon {:src (common/icon-path
                                                    (if build-succeeded? "Info-Info" "Info-Error"))}]]
-                     (tests-ad owner)]))])))))
+                     (tests-ad owner (:language project))]))])))))
 
 (defn circle-yml-ad []
   [:div

                 (when (om/get-state owner :is-open?)
                   (om/build-all build-tests-file-block bottom-map))))))]]]]))))

(defn build-tests-list [{{tests :tests} :tests-data
                         {build-status :status} :build
                         :as data}
                        owner]
  (reify
    om/IWillMount

          [:div.card.sub-head-content {:class (str "sub-head-" (name selected-tab))}
           (case selected-tab

             :tests (om/build build-tests-list {:build-data build-data
                                                :project project})

             :build-timing (om/build build-timings/build-timings {:build build
                                                                  :project project
