Changeset 7869e48 for perl/lib/BarnOwl/Hooks.pm
- Timestamp:
- Jan 12, 2013, 1:43:13 PM (11 years ago)
- Children:
- e3a0d71, 4485285
- Parents:
- 4626016
- git-author:
- Jason Gross <jgross@mit.edu> (01/12/13 13:13:18)
- git-committer:
- Jason Gross <jgross@mit.edu> (01/12/13 13:43:13)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
perl/lib/BarnOwl/Hooks.pm
rb8a3e00 r7869e48 12 12 13 13 C<BarnOwl::Hooks> exports a set of C<BarnOwl::Hook> objects made 14 available by BarnOwl internally. 14 available by BarnOwl internally. 15 15 16 16 =head2 USAGE … … 135 135 package BarnOwl; 136 136 if(*BarnOwl::format_msg{CODE}) { 137 # if the config defines a legacy formatting function, add 'perl' as a style 137 # if the config defines a legacy formatting function, add 'perl' as a style 138 138 BarnOwl::create_style("perl", BarnOwl::Style::Legacy->new( 139 139 "BarnOwl::format_msg", … … 163 163 BarnOwl::error("Can't load BarnOwl::ModuleLoader, loadable module support disabled:\n$@"); 164 164 } 165 165 166 166 $mainLoop->check_owlconf(); 167 167 $startup->run(0); … … 171 171 sub _shutdown { 172 172 $shutdown->run; 173 173 174 174 BarnOwl::shutdown() if *BarnOwl::shutdown{CODE}; 175 175 } … … 179 179 180 180 $receiveMessage->run($m); 181 181 182 182 BarnOwl::receive_msg($m) if *BarnOwl::receive_msg{CODE}; 183 183 } … … 187 187 188 188 $newMessage->run($m); 189 189 190 190 BarnOwl::new_msg($m) if *BarnOwl::new_msg{CODE}; 191 191 }
Note: See TracChangeset
for help on using the changeset viewer.