Quick Cluster: Add horizontal rule in cluster membership table.

[pspp] / src / language / stats / quick-cluster.c

diff --git a/src/language/stats/quick-cluster.c b/src/language/stats/quick-cluster.c
index 56c95c3fbd4ce95e913359f196f626ce87e00f55..9a220eec632b02b2bcfe7ac06ab2b2ed2a6f4dc4 100644 (file)
--- a/src/language/stats/quick-cluster.c
+++ b/src/language/stats/quick-cluster.c
@@ -156,7 +156,7 @@ kmeans_destroy (struct Kmeans *kmeans)
 
 /* Creates random centers using randomly selected cases from the data. */
 static void
-kmeans_randomize_centers (struct Kmeans *kmeans, const struct casereader *reader, const struct qc *qc)
+kmeans_randomize_centers (struct Kmeans *kmeans, const struct casereader *reader UNUSED, const struct qc *qc)
 {
   int i, j;
   for (i = 0; i < qc->ngroups; i++)
@@ -473,6 +473,8 @@ quick_cluster_show_membership (struct Kmeans *kmeans, const struct casereader *r
   tab_text (t, 0, 0, TAB_CENTER, _("Case Number"));
   tab_text (t, 1, 0, TAB_CENTER, _("Cluster"));
   tab_box (t, TAL_2, TAL_2, TAL_0, TAL_1, 0, 0, nc - 1, nr - 1);
+  tab_hline (t, TAL_1, 0, nc - 1, 1);
+
 
   for (i = 0; (c = casereader_read (cs)) != NULL; i++, case_unref (c))
     {