[ViewVC] Diff of: cvs/deliantra/server/ext/login.ext

Comparing deliantra/server/ext/login.ext (file contents):
Revision 1.91 by root, Sat Sep 20 00:09:26 2008 UTC vs.
Revision 1.94 by root, Sat Dec 13 21:46:12 2008 UTC

 }
 sub query {
    my ($ns, $flags, $text) = @_;
-   my $current = $Coro::current;
+   $ns->query ($flags, $text, Coro::rouse_cb);
-   $ns->query ($flags, $text, sub { $current->ready; $current = $_[0] });
+   Coro::rouse_wait
-   Coro::schedule while ref $current;
-   $current
 }
 sub can_cleanup {
    my ($pl, $mtime) = @_;
                $ns->send_drawinfo (
                   "That username is currently used in another login session. "
                 . "Chose another, or wait till the other session has ended.",
                   cf::NDI_RED
                );
-            } elsif ($user =~ /^[a-zA-Z0-9][a-zA-Z0-9\-_]{2,17}\z/) {
+            } elsif ($user =~ /^[a-zA-Z0-9][a-zA-Z0-9\-_]{2,19}\z/) {
                last;
             } else {
                $ns->send_drawinfo (
                   "Your username contains illegal characters "
                 . "(only a-z, A-Z and 0-9 are allowed), "
-                . "or is not between 3 and 18 characters in length.",
+                . "or is not between 3 and 20 characters in length.",
                   cf::NDI_RED
                );
             }
             Coro::Timer::sleep 0.4;
          }
             Coro::Timer::sleep 0.2;
          }
          $ob->reply (undef, "Welcome to Deliantra!");
+         # XXX: Workaround for delayed client ext protocol handshake
+         $pl->esrv_new_player;
          delete $pl->{deny_save};
          last;
       }
    });

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