%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% File         : WEBSERVER
%% Created by   : Joakim Eriksson & Niclas Finne
%% Created date : 01-12-14
%%
%% $Author: nfi $
%% $Date: 2001/12/14 14:27:11 $
%% $Revision: 1.1 $
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%% Description: 
%%
%% Predicates:
%%

:- module(webserver, [start/0]).
:- use_module('../../http/webfile', []).

start :-
    webfile:add_page(files, public_html),
    server:init,
    http_server:get_url(URL),
    format('Please browse to ~sfiles~n', [URL]),
    server:run.