--- deliantra/Deliantra-Client/DC/Protocol.pm	2006/06/07 07:00:30	1.27
+++ deliantra/Deliantra-Client/DC/Protocol.pm	2006/06/11 17:13:20	1.28
@@ -625,8 +625,15 @@
    my ($self, $player) = @_;
 
    $::STATWIDS->{weight}->set_text (sprintf "Weight: %.1fkg", $player->{weight} / 1000);
+}
+
+sub logged_in {
+   my ($self) = @_;
+
+   $self->send_ext_req (cfplus => "version", "1", sub {
+      $self->{cfplus_ext} = $_[0];
+   });
 
-   # do it here because it is ignored earlier, and there is no "login" event
    $self->send_command ("output-sync $::CFG->{output_sync}");
    $self->send_command ("output-count $::CFG->{output_count}");
    $self->send_command ("pickup $::CFG->{pickup}")