Changeset b6c067a for owl.c


Ignore:
Timestamp:
Feb 16, 2007, 1:37:44 AM (17 years ago)
Author:
Nelson Elhage <nelhage@mit.edu>
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:
6e6ded7
Parents:
3f21b8e
git-author:
Nelson Elhage <nelhage@mit.edu> (02/15/07 23:16:22)
git-committer:
Nelson Elhage <nelhage@mit.edu> (02/16/07 01:37:44)
Message:
Moving the default style into perl, and reorganizing things so we can
bootstrap the style into place in time.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • owl.c

    r687c674 rb6c067a  
    227227  }
    228228
     229  /* Initialize perl */
     230  owl_function_debugmsg("startup: processing config file");
     231  owl_context_set_readconfig(owl_global_get_context(&g));
     232  perlerr=owl_perlconfig_initperl(configfile);
     233  if (perlerr) {
     234    endwin();
     235    owl_function_error("Internal perl error: %s\n", perlerr);
     236    fprintf(stderr, "Internal perl error: %s\n", perlerr);
     237    fflush(stderr);
     238    printf("Internal perl error: %s\n", perlerr);
     239    fflush(stdout);
     240    exit(1);
     241  }
     242
    229243  /* setup the built-in styles */
    230244  owl_function_debugmsg("startup: creating built-in styles");
    231   s=owl_malloc(sizeof(owl_style));
    232   owl_style_create_internal(s, "default", &owl_stylefunc_default, "Default message formatting");
    233   owl_global_add_style(&g, s);
    234245
    235246  s=owl_malloc(sizeof(owl_style));
     
    304315  owl_function_debugmsg("startup: doing AIM initialization");
    305316  owl_aim_init();
    306 
    307   /* read the config file */
    308   owl_function_debugmsg("startup: processing config file");
    309   owl_context_set_readconfig(owl_global_get_context(&g));
    310   perlerr=owl_perlconfig_readconfig(configfile);
    311   if (perlerr) {
    312     endwin();
    313     owl_function_error("Error parsing configfile: %s\n", perlerr);
    314     fprintf(stderr, "\nError parsing configfile: %s\n", perlerr);
    315     fflush(stderr);
    316     printf("\nError parsing configfile: %s\n", perlerr);
    317     fflush(stdout);
    318     exit(1);
    319   }
    320317
    321318  /* if the config defines a formatting function, add 'perl' as a style */
Note: See TracChangeset for help on using the changeset viewer.