[mcclim-cvs] CVS mcclim/Apps/Inspector

[thenriksen]

Update of /project/mcclim/cvsroot/mcclim/Apps/Inspector
In directory clnet:/tmp/cvs-serv8610/Apps/Inspector

Modified Files:
	inspector.lisp 
Log Message:
Make clouseau:inspector return the inspected object, for easier
debugging.


--- /project/mcclim/cvsroot/mcclim/Apps/Inspector/inspector.lisp	2007/02/08 05:47:46	1.35
+++ /project/mcclim/cvsroot/mcclim/Apps/Inspector/inspector.lisp	2007/12/08 11:18:20	1.36
@@ -71,7 +71,8 @@
 	(clim-sys:make-process #'run
 			       :name (format nil "Inspector Clouseau: ~S"
 					     obj))
-	(run))))
+	(run))
+    obj))
 
 (defparameter *inspected-objects* '()
   "A list of objects which are currently being inspected with