From e003d06b235877e106cd3a8e38911ba6fb151b74 Mon Sep 17 00:00:00 2001
From: bluesaxman <bluesaxman@murkfall.net>
Date: Fri, 4 Sep 2020 09:04:42 -0600
Subject: [PATCH] Added moveCard function internals

---
 Server/server.pl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

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 {