From 282800b4783bfdc90952bd56a1ace190776118d1 Mon Sep 17 00:00:00 2001
From: kikito <kikito@gmail.com>
Date: Mon, 29 Oct 2012 20:49:20 +0100
Subject: [PATCH] small refactor

---
 inspect.lua | 27 +++++++++++++--------------
 1 file changed, 13 insertions(+), 14 deletions(-)

diff --git a/inspect.lua b/inspect.lua
index 892d91b..7547090 100644
--- a/inspect.lua
+++ b/inspect.lua
@@ -27,7 +27,7 @@ local function unescape(str)
 end
 
 local function isIdentifier(str)
-  return string.match( str, "^[_%a][_%a%d]*$" )
+  return type(str) == 'string' and str:match( "^[_%a][_%a%d]*$" )
 end
 
 local function isArrayKey(k, length)
@@ -91,21 +91,13 @@ function Inspector:new(v, depth)
     }
   }
 
-  setmetatable( inspector, { 
+  setmetatable( inspector, {
     __index = Inspector,
     __tostring = function(instance) return table.concat(instance.buffer) end
   } )
   return inspector:putValue(v)
 end
 
-function Inspector:puts(...)
-  local args = {...}
-  for i=1, #args do
-    table.insert(self.buffer, tostring(args[i]))
-  end
-  return self
-end
-
 function Inspector:tabify()
   self:puts("\n", string.rep("  ", self.level))
   return self
@@ -119,6 +111,14 @@ function Inspector:down()
   self.level = self.level + 1
 end
 
+function Inspector:puts(...)
+  local args = {...}
+  for i=1, #args do
+    table.insert(self.buffer, tostring(args[i]))
+  end
+  return self
+end
+
 function Inspector:putComma(comma)
   if comma then self:puts(',') end
   return true
@@ -160,7 +160,7 @@ function Inspector:putTable(t)
         self:tabify():puts('<metatable> = '):putValue(mt)
       end
     self:up()
-    
+
     if #dictKeys > 0 or mt then -- dictionary table. Justify closing }
       self:tabify()
     elseif length > 0 then -- array tables have one extra space before closing }
@@ -202,10 +202,9 @@ function Inspector:putValue(v)
   return self
 end
 
+
 function Inspector:putKey(k)
-  if type(k) == "string" and isIdentifier(k) then
-    return self:puts(k)
-  end
+  if isIdentifier(k) then return self:puts(k) end
   return self:puts( "[" ):putValue(k):puts("]")
 end