From f1f7e020c80d64bf7ed069653b981193f1599e08 Mon Sep 17 00:00:00 2001 From: Dimitrios Piliouras Date: Thu, 12 Jul 2012 10:58:00 -0700 Subject: [PATCH] Change inspect-table to find first non-nil row for keys --- src/clj/clojure/inspector.clj | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/clj/clojure/inspector.clj b/src/clj/clojure/inspector.clj index aa708b5..570a9fc 100644 --- a/src/clj/clojure/inspector.clj +++ b/src/clj/clojure/inspector.clj @@ -66,7 +66,7 @@ (defn old-table-model [data] - (let [row1 (first data) + (let [row1 (some #(when-not (nil? %) %) data) colcnt (count row1) cnt (count data) vals (if (map? row1) vals identity)] -- 1.7.10