… | |
… | |
33 | our $config; |
33 | our $config; |
34 | our $LIBDIR = "."; |
34 | our $LIBDIR = "."; |
35 | |
35 | |
36 | use KGS::Constants; |
36 | use KGS::Constants; |
37 | |
37 | |
38 | for (qw(util.pl gtk.pl chat.pl superchat.pl sound.pl user.pl gamelist.pl userlist.pl |
38 | for (qw(util.pl gtk.pl chat.pl sound.pl user.pl gamelist.pl userlist.pl |
39 | game.pl room.pl roomlist.pl app.pl)) { |
39 | game.pl room.pl roomlist.pl app.pl)) { |
40 | require (KGS::Constants::findfile "KGS/kgsueme/$_"); |
40 | require (KGS::Constants::findfile "KGS/kgsueme/$_"); |
41 | die if $@; |
41 | die if $@; |
42 | } |
42 | } |
43 | } |
43 | } |