[286] in BarnOwl Developers

home help back first fref pref prev next nref lref last post

[D-O-H] r444 - / trunk/owl

daemon@ATHENA.MIT.EDU (hartmans@MIT.EDU)
Thu Oct 29 18:04:30 2009

Resent-From: nelhage@mit.edu
Resent-To: barnowl-dev-mtg@charon.mit.edu
To: dirty-owl-hackers@mit.edu
From: hartmans@MIT.EDU
Reply-To: dirty-owl-hackers@MIT.EDU
Date: Wed,  1 Nov 2006 13:00:52 -0500 (EST)

Author: hartmans
Date: 2006-11-01 13:00:51 -0500 (Wed, 01 Nov 2006)
New Revision: 444

Modified:
   /
   trunk/owl/perlwrap.pm
Log:
Move startup hooks to right place in reload.
Drop debugging copy of queue_admin_msg



Property changes on: 
___________________________________________________________________
Name: svk:merge
   - 6aa88b72-b502-0410-8cb4-a5dd0230fb79:/owl-local:1355
   + 6aa88b72-b502-0410-8cb4-a5dd0230fb79:/owl-local:1356

Modified: trunk/owl/perlwrap.pm
===================================================================
--- trunk/owl/perlwrap.pm	2006-11-01 18:00:46 UTC (rev 443)
+++ trunk/owl/perlwrap.pm	2006-11-01 18:00:51 UTC (rev 444)
@@ -357,7 +357,7 @@
 sub reload_hook (@) 
 {
     
-  @onStartSubs = ();
+
     onStart();
     return 1;
 }
@@ -369,6 +369,7 @@
     owl::mainloop_hook();
     $reload = 0;
     @onMainLoop = ();
+  @onStartSubs = ();
     
     # Do reload
     if (do "$ENV{HOME}/.owlconf" && reload_hook(@_))
@@ -405,14 +406,6 @@
 closedir(MODULES);
 }
 }
-sub queue_admin_msg
-{
-    my $err = shift;
-    my $m = owl::Message->new(type => 'admin',
-			      direction => 'none',
-			      body => $err);
-    owl::queue_message($m);
-}
 
 
 ################################################################################


home help back first fref pref prev next nref lref last post