Changeset 3d18b30

Timestamp:

Nov 1, 2006, 1:00:51 PM (18 years ago)

Author:

Sam Hartman <hartmans@mit.edu>

Branches:

master, barnowl_perlaim, debian, release-1.10, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9

Children:

591ea418

Parents:

7e470da

Message:

Move startup hooks to right place in reload.
Drop debugging copy of queue_admin_msg

File:

• perlwrap.pm (modified) (3 diffs)

perlwrap.pm

@@ -358 +358 @@
 {
     
-  @onStartSubs = ();
+
     onStart();
     return 1;
@@ -370 +370 @@
     $reload = 0;
     @onMainLoop = ();
+  @onStartSubs = ();
     
     # Do reload
@@ -405 +406 @@
 closedir(MODULES);
 }
-}
-sub queue_admin_msg
-{
-    my $err = shift;
-    my $m = owl::Message->new(type => 'admin',
-                              direction => 'none',
-                              body => $err);
-    owl::queue_message($m);
 }