Changeset 5596

Timestamp:

06/26/09 06:17:52 (3 years ago)

Author:

submersible_toaster

Message:

more vanity and boilerplate

File:

• trunk/Padre-Plugin-Swarm/lib/Padre/Plugin/Swarm.pm (modified) (3 diffs)

trunk/Padre-Plugin-Swarm/lib/Padre/Plugin/Swarm.pm

@@ -68 +68 @@
     $self->set_config( $config );
     
+    $self->_load_everything;
+    
     $self->_start_transports;
     $self->_start_services;
@@ -92 +94 @@
 Surrender to the Swarm!
 END_MESSAGE
-
+    $about->SetIcon( Padre::Wx::Icon::find( 'status/padre-plugin-swarm' ) );
     # Show the About dialog
     Wx::AboutBox($about);
@@ -102 +104 @@
 ###
 # Private
+
+sub _load_everything {
+    my $self = shift;
+    my $config = $self->get_config; 
+    # TODO bootstrap some config and construct
+    # services/transports. for now just multicast
+    
+    $self->set_transports(
+        {
+            Padre::Swarm::Transport::Multicast->transport_name
+                => Padre::Swarm::Transport::Multicast->new
+        }
+    );
+    
+    $self->set_services(
+        {
+        # Chat, remote cursor/editor damage 
+        #  , watch this space.
+        }
+    );
+    
+
+}
 
 sub _start_transports {