diff --git a/src/spellsuggest.c b/src/spellsuggest.c
index 267a4a5..b74d30b 100644
--- a/src/spellsuggest.c
+++ b/src/spellsuggest.c
@@ -887,7 +887,7 @@
     if (list != NULL)
     {
 	// Loop over the items in the list.
-	for (li = list->lv_first; li != NULL; li = li->li_next)
+	FOR_ALL_LIST_ITEMS(list, li)
 	    if (li->li_tv.v_type == VAR_LIST)
 	    {
 		// Get the word and the score from the items.