[tmcode commit] r314 - spine/branches/spine_2_2-devel/lib/Spine/Plugin

[oss...@gmail.com]

Author: richard
Date: Tue Mar 30 08:24:28 2010
New Revision: 314

Log:
add in spine_freeze support Ticket #109

Modified:
spine/branches/spine_2_2-devel/lib/Spine/Plugin/PrintData.pm

Modified: spine/branches/spine_2_2-devel/lib/Spine/Plugin/PrintData.pm
==============================================================================
--- spine/branches/spine_2_2-devel/lib/Spine/Plugin/PrintData.pm Tue Mar 30 08:21:13 2010 (r313)
+++ spine/branches/spine_2_2-devel/lib/Spine/Plugin/PrintData.pm Tue Mar 30 08:24:28 2010 (r314)
@@ -60,6 +60,11 @@
$::SAVE_STATE = 0;

require Data::Dumper;
+
+ # Used so that objects can return something useful if they wish
+ # (if you have an object in the tree and it supports spine_freeze)
+ $Data::Dumper::Freezer = "spine_freeze";
+
$Data::Dumper::Sortkeys = 1;

if ($PRINTALL|$PRINTDATA)