--- branches/new-fu/client/scireclient.pl 2007/12/26 05:18:17 264 +++ branches/new-fu/client/scireclient.pl 2007/12/26 05:18:56 265 @@ -162,8 +162,8 @@ send_command("IDENTIFY", $client_key); my $response = get_response(); $response =~ /^(OK|ERROR)(?: (.+))?$/; - if($1 eq "ERROR") { - print "Could not identify to server: $2\n"; + unless ($1 and ($1 eq "OK")) { + print "Could not identify to server: $response\n"; return 0; } # print "Registered client $conf{client_id}\n" if $conf{debug};