Changeset 4485285 for perl/lib/BarnOwl/Hooks.pm
- Timestamp:
- Jan 12, 2013, 1:43:31 PM (11 years ago)
- Parents:
- 4626016 (diff), 7869e48 (diff)
Note: this is a merge changeset, the changes displayed below correspond to the merge itself.
Use the (diff) links above to see all the changes relative to each parent. - 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.