[Phpgroupware-cvs] CVS: phpgwapi/inc functions.inc.php,1.129,1.130

[Miles Lott <address@hidden>]

Update of /cvsroot/phpgroupware/phpgwapi/inc
In directory subversions:/tmp/cvs-serv20386

Modified Files:
        functions.inc.php 
Log Message:
make _debug_array() look good on php4 again

Index: functions.inc.php
===================================================================
RCS file: /cvsroot/phpgroupware/phpgwapi/inc/functions.inc.php,v
retrieving revision 1.129
retrieving revision 1.130
diff -C2 -r1.129 -r1.130
*** functions.inc.php   16 Feb 2002 03:58:03 -0000      1.129
--- functions.inc.php   23 Feb 2002 18:07:45 -0000      1.130
***************
*** 589,593 ****
--- 589,606 ----
        function _debug_array($array)
        {
+               $four = False;
+               if(@floor(phpversion()) == 4)
+               {
+                       $four = True;
+               }
+               if($four)
+               {
+                       echo '<pre>';
+               }
                print_r($array);
+               if($four)
+               {
+                       echo '</pre>';
+               }
        }