From 5d7ab8e936e5f667483efbf0f0dc947ae33e415e Mon Sep 17 00:00:00 2001 Message-Id: <5d7ab8e936e5f667483efbf0f0dc947ae33e415e.1714792855.git.mdw@distorted.org.uk> From: Mark Wooding Date: Mon, 20 Aug 2007 11:20:21 +0000 Subject: [PATCH] Bug fix in TREE-MODEL-ROW-DATA Organization: Straylight/Edgeware From: espen --- gtk/gtktree.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/gtk/gtktree.lisp b/gtk/gtktree.lisp index 8469b04..89e103b 100644 --- a/gtk/gtktree.lisp +++ b/gtk/gtktree.lisp @@ -20,7 +20,7 @@ ;; TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE ;; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. -;; $Id: gtktree.lisp,v 1.28 2007-08-20 10:33:05 espen Exp $ +;; $Id: gtktree.lisp,v 1.29 2007-08-20 11:20:21 espen Exp $ (in-package "GTK") @@ -417,7 +417,7 @@ (defmethod tree-model-row-data ((model tree-model) row) (coerce (loop with iter = (ensure-tree-iter model row) - for index from 0 to (tree-model-n-columns model) + for index from 0 below (tree-model-n-columns model) collect (tree-model-value model iter index)) 'vector)) -- [mdw]