sup

A curses threads-with-tags style email client

sup.git

git clone https://supmua.dev/git/sup/
commit bdfecab5543f4b17996f6582c0cc369b14233c82
parent 575b990f67492b7c2f255cb54a2838eb548f8b48
Author: William Morgan <wmorgan-sup@masanjin.net>
Date:   Tue, 19 Feb 2008 18:50:58 -0800

Merge branch 'startup-hook' into next

Diffstat:
M bin/sup | 8 ++++++++
1 file changed, 8 insertions(+), 0 deletions(-)
diff --git a/bin/sup b/bin/sup
@@ -39,6 +39,12 @@ EOS
   opt :compose, "Compose message to this recipient upon startup", :type => String
 end
 
+Redwood::HookManager.register "startup", <<EOS
+Executes at startup
+No variables.
+No return value.
+EOS
+
 if $opts[:list_hooks]
   Redwood::HookManager.print_hooks
   exit
@@ -128,6 +134,8 @@ begin
     Index.add_source SentManager.new_source
   end
 
+  HookManager.run "startup"
+
   log "starting curses"
   start_cursing