- Timestamp:
- Jan 9, 2007, 11:33:44 PM (17 years ago)
- 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:
- d609dd6
- Parents:
- ffe70f9
- git-author:
- Nelson Elhage <nelhage@mit.edu> (01/09/07 18:50:40)
- git-committer:
- Nelson Elhage <nelhage@mit.edu> (01/09/07 23:33:44)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
owl.c
r00f9a7d r8203afd 319 319 owl_function_debugmsg("Found perl formatting"); 320 320 s=owl_malloc(sizeof(owl_style)); 321 owl_style_create_perl(s, "perl", " owl::_format_msg_legacy_wrap",322 "User-defined perl style that calls owl::format_msg"321 owl_style_create_perl(s, "perl", "BarnOwl::_format_msg_legacy_wrap", 322 "User-defined perl style that calls BarnOwl::format_msg" 323 323 "with legacy global variable support"); 324 324 owl_global_add_style(&g, s); … … 328 328 /* execute the startup function in the configfile */ 329 329 owl_function_debugmsg("startup: executing perl startup, if applicable"); 330 perlout = owl_perlconfig_execute(" owl::startup();");330 perlout = owl_perlconfig_execute("BarnOwl::Hooks::startup();"); 331 331 if (perlout) owl_free(perlout); 332 332 … … 439 439 } 440 440 441 /* Hook perl into the loop */ 442 if (owl_perlconfig_is_function("owl::mainloop_hook")) { 443 owl_perlconfig_mainloop(); 444 } 441 owl_perlconfig_mainloop(); 445 442 446 443 /* little hack */
Note: See TracChangeset
for help on using the changeset viewer.