Advertisement
Guest User

Untitled

a guest
Sep 12th, 2012
93
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Diff 1.62 KB | None | 0 0
  1. Index: src/functions.pl
  2. ===================================================================
  3. --- src/functions.pl    (revision 8145)
  4. +++ src/functions.pl    (working copy)
  5. @@ -261,7 +261,10 @@
  6.     Settings::addTableFile('skillsencore.txt', loader => [\&parseList, \%skillsEncore]);
  7.     Settings::addTableFile('quests.txt', loader => [\&parseROQuestsLUT, \%quests_lut], mustExist => 0);
  8.     Settings::addTableFile('effects.txt', loader => [\&parseDataFile2, \%effectName], mustExist => 0);
  9. -   Settings::addTableFile('msgstringtable.txt', loader => [\&parseArrayFile, \@msgTable]);
  10. +   Settings::addTableFile('msgstringtable.txt',
  11. +       loader => [\&parseArrayFile, \@msgTable],
  12. +       mustExist => 0,
  13. +       onLoaded => \&shiftMsgTable );
  14.  
  15.     use encoding 'utf8';
  16.  
  17. @@ -304,6 +307,10 @@
  18.     Log::message("\n");
  19.  }
  20.  
  21. +sub shiftMsgTable {
  22. +   shift @msgTable;
  23. +}
  24. +
  25.  sub initNetworking {
  26.     our $XKore_dontRedirect = 0;
  27.     my $XKore_version = $config{XKore};
  28. Index: src/Network/Receive/ServerType0.pm
  29. ===================================================================
  30. --- src/Network/Receive/ServerType0.pm  (revision 8145)
  31. +++ src/Network/Receive/ServerType0.pm  (working copy)
  32. @@ -3421,8 +3421,8 @@
  33.         message T("Your mercenary soldier has ran away.\n"), "info";
  34.         $self->mercenary_off ();
  35.        
  36. -   } elsif (@msgTable[$args->{msg_id}++]) { # show message from msgstringtable
  37. -       warning T(@msgTable[$args->{msg_id}++]."\n");
  38. +   } elsif (@msgTable[$args->{msg_id}]) { # show message from msgstringtable
  39. +       warning T(@msgTable[$args->{msg_id}]."\n");
  40.        
  41.     } elsif ($args->{msg_id} == 0x054D) {
  42.         message T("View player equip request denied.\n"), "info";
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement