diff --git a/Server/server.pl b/Server/server.pl
index 3a16908..9ebbf1b 100755
--- a/Server/server.pl
+++ b/Server/server.pl
@@ -132,7 +132,8 @@ sub getHands {
 
 sub moveCard {
 	my ($originStackRef, $originIndex, $destStackRef, $destIndex) = @_;
-	# splice card out of one deck, and into the other. 
+	my $card = splice(@$originStackRef,$originIndex,1);
+	splice(@$destStackRef,$destIndex,0,$card);
 }
 
 sub drawCard {