* examples/extauth/check_pass_null.pl: Fixed external

authentication example script (EJAB-404)

SVN Revision: 973

diff --git a/ChangeLog b/ChangeLog
index 30f88d3f62085309008fcfdb972bea5cc9ae7462..76abd9abeaef3e2db09fa5e23f62a52049aaa81f 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,7 +1,12 @@
 2007-11-16  Christophe Romain <christophe.romain@process-one.net>
 
-       * src/ejabberd_auth_internal.erl: Better count management and batch users
-       retrieval internal database
+       * src/ejabberd_auth_internal.erl: Better count management and
+       batch users retrieval internal database
+
+2007-11-14  Mickael Remond  <mremond@process-one.net>
+
+       * examples/extauth/check_pass_null.pl: Fixed external
+       authentication example script (EJAB-404)
 
 2007-11-05  Mickael Remond  <mremond@process-one.net>
 

diff --git a/examples/extauth/check_pass_null.pl b/examples/extauth/check_pass_null.pl
index 90e575fcfbdfbafa0cdef7f501fb4baf8ccd3cd2..f15fe910b1375a2d3ffba1906c7aa473d069dc8b 100644 (file)
--- a/examples/extauth/check_pass_null.pl
+++ b/examples/extauth/check_pass_null.pl
@@ -18,7 +18,7 @@ while(1)
     my $len = unpack "n",$buf;
     my $nread = sysread STDIN,$buf,$len;
 
-    my ($op,$user,$password) = split /:/,$buf;
+    my ($op,$user,$host,$password) = split /:/,$buf;
     #$user =~ s/\./\//og;
     my $jid = "$user\@$domain";
     my $result;