bluesaxman/deckard-and-company
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

changed default names for hand, deck and pool objects

Browse Source
This commit is contained in:
bluesaxman 2020-09-29 21:28:19 +00:00
parent 44fbe0874b
commit 5707488818
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
Server/server.pl
View File

@ -103,7 +103,7 @@ sub addUser {
name => "$userID",
hands => {}
};
addHand($sessionID,$userID,"default");
addHand($sessionID,$userID,"default_hand");
return 1;
}
@ -258,10 +258,10 @@ sub getPoolTop {
sub normalizeSession {
my $sessionID = shift;
unless ($sessionID) { return print "ERROR: Session not provided\n"; }
unless (scalar getDecks($sessionID)) { addDeck($sessionID,"default"); }
unless (scalar getPools($sessionID)) { addPool($sessionID,"default"); }
unless (scalar getDecks($sessionID)) { addDeck($sessionID,"default_deck"); }
unless (scalar getPools($sessionID)) { addPool($sessionID,"default_pool"); }
for (getUsers($sessionID)) {
unless(scalar getHands($sessionID, $_)) { addHand($sessionID,$_,"default"); }
unless(scalar getHands($sessionID, $_)) { addHand($sessionID,$_,"default_hand"); }
}
}