From ba71bb7fb35b92f6077f9b0450c7cd99b8a84582 Mon Sep 17 00:00:00 2001
From: David Schmenk <dschmenk@gmail.com>
Date: Fri, 15 Jul 2016 15:04:02 -0700
Subject: [PATCH] Put some code to check list removal. Clean up local strings
 in inventory

---
 Platform/Apple/virtual/src/plasma/gameloop.pla | 2 +-
 Platform/Apple/virtual/src/plasma/party.pla    | 6 ++++++
 2 files changed, 7 insertions(+), 1 deletion(-)

diff --git a/Platform/Apple/virtual/src/plasma/gameloop.pla b/Platform/Apple/virtual/src/plasma/gameloop.pla
index 85b7638d..e40b1505 100644
--- a/Platform/Apple/virtual/src/plasma/gameloop.pla
+++ b/Platform/Apple/virtual/src/plasma/gameloop.pla
@@ -1187,7 +1187,7 @@ def displayPlayerData(player)
       pi = pi=>p_nextObj
     loop
     if pi
-      rightJustifyStr(pi->s_name, CHAR_WND_WEAPON_X)
+      rightJustifyStr(pi=>s_name, CHAR_WND_WEAPON_X)
     else
       rightJustifyStr("Fists", CHAR_WND_WEAPON_X)
     fin
diff --git a/Platform/Apple/virtual/src/plasma/party.pla b/Platform/Apple/virtual/src/plasma/party.pla
index 9bcdd0ee..9fd85bf7 100644
--- a/Platform/Apple/virtual/src/plasma/party.pla
+++ b/Platform/Apple/virtual/src/plasma/party.pla
@@ -287,7 +287,12 @@ def _party_doPlayerSheet(num)
             next
             rawDisplayStr(@strYouSure)
             if getYN()
+              i = countList(player=>p_items)
               removeFromList(@player=>p_items, item)
+              if countList(player=>p_items) <> i - 1
+                displayStr("remove List error!")
+                getUpperKey()
+              fin
               calcPlayerArmor(player)
             fin
           fin
@@ -313,6 +318,7 @@ def _party_doPlayerSheet(num)
       // All done
       otherwise return
     wend
+    tossStrings() // Free up local strings
   until 0
 end