[ViewVC] Diff of: cvs/deliantra/Deliantra-Client/bin/pclient

Comparing deliantra/Deliantra-Client/bin/pclient (file contents):
Revision 1.99 by root, Fri Apr 14 02:03:11 2006 UTC vs.
Revision 1.100 by elmex, Fri Apr 14 10:57:36 2006 UTC

       border_bg => [1, 1, 1, 0.5],
       bg        => [0.3, 0.3, 0.3, 0.8],
       child     => (my $vbox = new CFClient::UI::VBox);
    $vbox->add ($LOGVIEW = new CFClient::UI::TextView expand => 1);
-   $vbox->add (my $input = new CFClient::UI::Entry);
+   $vbox->add (my $input = new CFClient::UI::LineEntry);
+      $input->connect (activate => sub {
+         my ($input, $text) = @_;
+         $input->set_text ('');
+         if ($text =~ /^\/(.*)/) {
+            $::CONN->user_send ("command $1");
+         } else {
+            $::CONN->user_send ("command say $text");
+         }
+         1
+      });
    $window
 }
 sub sdl_init {

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines