perl websocket client WIP

Signed-off-by: Bill Erickson <berickxx@gmail.com>

diff --git a/src/perl/lib/OpenSRF/Transport/WebSockets/Message.pm b/src/perl/lib/OpenSRF/Transport/WebSockets/Message.pm
index 8340452..beb5784 100644 (file)
--- a/src/perl/lib/OpenSRF/Transport/WebSockets/Message.pm
+++ b/src/perl/lib/OpenSRF/Transport/WebSockets/Message.pm
@@ -94,42 +94,17 @@ sub msg {
 
 # TODO: these came from MessageWrapper... do we need any of these?
 
-sub toString {
-}
-
-sub get_body {
-}
-
-sub get_sess_id {
-}
-
-sub get_msg_type {
-}
-
-sub get_remote_id {
-}
-
-sub setType {
-}
-
-sub setTo {
-}
-
-sub setThread {
-}
-
-sub setBody {
-}
-
-sub set_router_command {
-}
-sub set_router_class {
-}
-
-sub set_osrf_xid {
-}
-
-sub get_osrf_xid {
-}
-
+sub toString { }
+sub get_body { }
+sub get_sess_id { }
+sub get_msg_type { }
+sub get_remote_id { }
+sub setType { }
+sub setTo { }
+sub setThread { }
+sub setBody { }
+sub set_router_command { }
+sub set_router_class { } 
+sub set_osrf_xid { } 
+sub get_osrf_xid { } 
 1;