diff --git a/xvaga/xvaga.cpp b/xvaga/xvaga.cpp
index 00e5948e6..cc9b969aa 100755
--- a/xvaga/xvaga.cpp
+++ b/xvaga/xvaga.cpp
@@ -3173,7 +3173,7 @@ BOOLEAN xvt_slist_add_at_elt(SLIST list, SLIST_ELT e, const char *sx, long data)
 		item->data = data;
 		item->next = NULL;
 
-		SLIST_ELT last = NULL;
+    SLIST_ELT last = NULL;
     if (e != NULL)
     {
 		  for (SLIST_ELT i = list->head; i; i = (SLIST_ELT)i->next)
@@ -3183,8 +3183,11 @@ BOOLEAN xvt_slist_add_at_elt(SLIST list, SLIST_ELT e, const char *sx, long data)
 				  break;
 		  }
     }		
-		if (last == NULL)  // Empty List
+		if (last == NULL)
+    {
+      item->next = list->head;
 			list->head = item;
+    }
 		else
 		{
 			item->next = last->next;