From 3a09f3af0eb560eb8ebb4f7c843ade55076cf0f4 Mon Sep 17 00:00:00 2001
From: joye <joye>
Date: Tue, 3 Jun 2014 20:10:57 +0000
Subject: *** empty log message ***

---
 src/bltConfig.C | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/bltConfig.C b/src/bltConfig.C
index 879299b..c43155b 100644
--- a/src/bltConfig.C
+++ b/src/bltConfig.C
@@ -173,7 +173,7 @@ static int ListSetProc(ClientData clientData, Tcl_Interp *interp,
   const char*** listPtr = (const char***)(widgRec + offset);
   *(double*)savePtr = *(double*)listPtr;
 
-  if (!(*listPtr))
+  if (!listPtr)
     return TCL_OK;
 
   const char** argv;
@@ -191,12 +191,12 @@ static Tcl_Obj* ListGetProc(ClientData clientData, Tk_Window tkwin,
 {
   const char*** listPtr = (const char***)(widgRec + offset);
 
-  if (!(*listPtr))
+  if (!listPtr || !(*listPtr))
     return Tcl_NewListObj(0, NULL);
 
   // count how many
   int cnt=0;
-  for (const char** p = *listPtr; *p; p++,cnt++) {}
+  for (const char** pp=*listPtr; *pp; pp++,cnt++) {}
   if (!cnt)
     return Tcl_NewListObj(0, NULL);
 
-- 
cgit v0.12