Only pass simple data through the fifo, pre-store the rest
authorMike Rylander <mrylander@gmail.com>
Mon, 28 Jul 2014 12:38:58 +0000 (08:38 -0400)
committerBill Erickson <berick@esilibrary.com>
Fri, 8 Aug 2014 14:08:37 +0000 (10:08 -0400)
Signed-off-by: Mike Rylander <mrylander@gmail.com>
SIPServer.pm

index 2be20be..46f8996 100644 (file)
@@ -196,11 +196,6 @@ sub PERMAFROST {
 
         my $c = $$login{id};
         if ($$login{success}) {
-            $active_connections{$c}{config} = $config;
-
-            $active_connections{$c}{id} = $$login{id};
-            $active_connections{$c}{transport} = $$login{transport};
-
             for my $p (keys %{ $$login{net_server_parts} }) {
                 $active_connections{$c}{net_server}{$p} = 
                     $$login{net_server_parts}{$p};
@@ -302,7 +297,6 @@ sub mux_input {
                 freeze({
                     id => $conn_id,
                     success => $success,
-                    transport  => $transport,
                     net_server_parts => {
                         map { ($_ => $$self{$_}) } qw/ils state institution account/
                     }