-
Notifications
You must be signed in to change notification settings - Fork 5
/
Copy pathload.pl
30 lines (25 loc) · 842 Bytes
/
load.pl
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
% Main file to load the pengines demo. This file is included from
%
% - debug.pl for local debugging
% - daemon.pl to run pengines as a Unix service
:- use_module(library(pengines)).
:- use_module(library(http/http_error)).
:- use_module(server).
:- use_module(storage).
:- use_module(lib/admin/admin).
:- use_module(lib/admin/server_statistics).
:- use_module(lib/admin/change_passwd).
:- if(exists_source(apps(swish/swish))).
:- multifile http:location/3.
http:location(swish, apps(swish), [priority(10)]).
:- use_module(apps(swish/swish)).
:- endif.
% access at /apps/genealogist/index.html
:- if(exists_source(apps(genealogist/app))).
:- multifile http:location/3.
:- use_module(apps(genealogist/app)).
:- endif.
% :- pengine_application(geobase).
:- multifile http:location/3.
:- use_module(apps(geobase/geobase)).
:- loaddba.