X-Git-Url: https://git.adam-barratt.org.uk/?a=blobdiff_plain;f=ud-fingerserv;h=1a944e76bdd76723216948a54ee186ac23cd9f65;hb=551f36fe90550b1816227e8e1bf7d4080d5a5241;hp=26c3dfdd341c9b721c1d272a9cf5e48b6b9c1077;hpb=abfbcdfee46877cea5d2b73593f27d3d7a6f7ab1;p=mirror%2Fuserdir-ldap.git diff --git a/ud-fingerserv b/ud-fingerserv index 26c3dfd..1a944e7 100755 --- a/ud-fingerserv +++ b/ud-fingerserv @@ -1,7 +1,8 @@ #!/usr/bin/perl -# $Id: ud-fingerserv,v 1.17 2004/10/24 18:35:31 joey Exp $ +# $Id: ud-fingerserv,v 1.19 2004/11/18 19:10:57 joey Exp $ # (c) 1999 Randolph Chung. Licensed under the GPL. +# (c) 2004 Martin Schulze. Licensed under the GPL. use lib '/var/www/userdir-ldap/'; #use lib '/home/randolph/projects/userdir-ldap/web'; @@ -29,10 +30,11 @@ my %attrs = ( 'key' => 'Key block', 'ircnick' => 'IRC nickname', 'icquin' => 'ICQ UIN', + 'jabberjid' => 'Jabber ID', 'labeleduri' => 'URL' ); -my @summarykeys = ('cn', 'mn', 'sn', 'email', 'labeleduri', 'ircnick', 'icquin', 'keyfingerprint', 'key'); +my @summarykeys = ('cn', 'mn', 'sn', 'email', 'labeleduri', 'ircnick', 'icquin', 'jabberjid', 'keyfingerprint', 'key'); $SIG{__DIE__} = \&DieHandler; $SIG{INT} = \&DieHandler; @@ -153,7 +155,7 @@ sub ProcessQuery { foreach $key (split(/,/, $fields)) { if ($key eq 'key') { foreach (@keyfingerprint) { - push (@{$data->{key}}, "\n".&Util::FetchKey($_)); + push (@{$data->{key}}, "\n".&Util::FetchKey($_), 0); } } foreach (@{$data->{$key}}) {