Changeset c1d2e6c


Ignore:
Timestamp:
Dec 13, 2008, 6:37:44 PM (16 years ago)
Author:
Sam Hartman <hartmans@mit.edu>
Branches:
debian
Children:
2c0f4f7
Parents:
8d07892a
Message:
* Call perl_sys_init3; Closes: 495056
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • owl.c

    r7ba9ead9 rc1d2e6c  
    2020#include <locale.h>
    2121#include "owl.h"
     22
    2223
    2324#if OWL_STDERR_REDIR
     
    232233  owl_function_debugmsg("startup: processing config file");
    233234  owl_context_set_readconfig(owl_global_get_context(&g));
    234   perlerr=owl_perlconfig_initperl(configfile);
     235  perlerr=owl_perlconfig_initperl(configfile, &argc, &argv, &env);
    235236  if (perlerr) {
    236237    endwin();
  • perlconfig.c

    rc4ba74d rc1d2e6c  
    286286
    287287
    288 char *owl_perlconfig_initperl(char * file)
     288char *owl_perlconfig_initperl(char * file, int *Pargc, char ***Pargv, char *** Penv)
    289289{
    290290  int ret;
     
    294294
    295295  /* create and initialize interpreter */
     296  PERL_SYS_INIT3(Pargc, Pargv, Penv);
    296297  p=perl_alloc();
    297298  owl_global_set_perlinterp(&g, (void*)p);
Note: See TracChangeset for help on using the changeset viewer.