Roxen.git / server / base_server / module.pike

version» Context lines:

Roxen.git/server/base_server/module.pike:1: - /* $Id: module.pike,v 1.36 1999/06/09 01:46:54 mast Exp $ */ + /* $Id: module.pike,v 1.37 1999/06/28 01:42:49 mast Exp $ */      #include <module.h>      #define TRACE_ENTER(A,B) do{if(id->misc->trace_enter)id->misc->trace_enter((A),(B));}while(0)   #define TRACE_LEAVE(A) do{if(id->misc->trace_leave)id->misc->trace_leave((A));}while(0)      mapping (string:mixed *) variables=([]);      object this = this_object();   int module_type;   string fix_cvs(string from)   {    from = replace(from, ({ "$", "Id: "," Exp $" }), ({"","",""}));    sscanf(from, "%*s,v %s", from);    return from;   }      int module_dependencies(object configuration, array (string) modules)   { -  if(configuration) -  { -  foreach (modules, string module) -  { -  if(!configuration->modules[module] || -  (!configuration->modules[module]->copies && -  !configuration->modules[module]->master)) -  configuration->enable_module(module+"#0"); -  } -  if(roxen->root) -  roxen->configuration_interface()->build_root(roxen->root); -  } +  if(configuration) configuration->add_modules (modules);    mixed err;    if (err = catch (_do_call_outs()))    report_error ("Error doing call outs:\n" + describe_backtrace (err));    return 1;   }      string file_name_and_stuff()   {    return ("<b>Loaded from:</b> "+(roxen->filename(this))+"<br>"+    (this->cvs_version?"<b>CVS Version: </b>"+fix_cvs(this->cvs_version)+"<nr>\n":""));