steffen: server/kolabd/kolabd kolabconf,1.2,1.3

cvs at intevation.de cvs at intevation.de
Tue Jul 26 03:50:01 CEST 2005


Author: steffen

Update of /kolabrepository/server/kolabd/kolabd
In directory doto:/tmp/cvs-serv16320/kolabd

Modified Files:
	kolabconf 
Log Message:
better debug output of multivalued data

Index: kolabconf
===================================================================
RCS file: /kolabrepository/server/kolabd/kolabd/kolabconf,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- kolabconf	28 Apr 2005 00:16:59 -0000	1.2
+++ kolabconf	26 Jul 2005 01:49:59 -0000	1.3
@@ -52,7 +52,13 @@
 }
 if ($opt_d) {
     foreach my $key (sort keys %Kolab::config) {
-        print "$key : " . $Kolab::config{$key} . "\n";
+		my $value;
+		if( ref($Kolab::config{$key}) eq "ARRAY" ) {
+			$value = join( ", ", @{$Kolab::config{$key}});
+		} else {
+			$value = $Kolab::config{$key};
+		}
+        print "$key : " . $value . "\n";
     }
     exit 0;
 }





More information about the commits mailing list