From: Jan P. <jp...@us...> - 2006-08-25 14:28:16
|
Update of /cvsroot/e-p-i-c/org.epic.debug In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv5249 Modified Files: Tag: stable dumpvar_epic.pm Log Message: Fixed bug [ 1546237 ] Error parsing debugger variables. Index: dumpvar_epic.pm =================================================================== RCS file: /cvsroot/e-p-i-c/org.epic.debug/dumpvar_epic.pm,v retrieving revision 1.4 retrieving revision 1.4.2.1 diff -u -d -r1.4 -r1.4.2.1 --- dumpvar_epic.pm 10 Aug 2005 13:28:01 -0000 1.4 +++ dumpvar_epic.pm 25 Aug 2006 14:28:13 -0000 1.4.2.1 @@ -231,7 +231,7 @@ my @sortKeys = sort keys(%$v) ; $tHashDepth = $#sortKeys ; $tHashDepth = $#sortKeys < $hashDepth-1 ? $#sortKeys : $hashDepth-1 - unless $hashDepth eq '' ; + unless !defined($hashDepth) || $hashDepth eq '' ; if( @sortKeys ){ print buildString("...").$TOKEN_IN} for $key (@sortKeys) { |