:- use_module(library(lists),[append/3]).

% APPLY CHANGES BELOW

% Application
set_app_search_paths:-
  absolute_file_name('app_search_paths.pl',Abs),
  atom_chars(Abs,AbsChars),
  append(PathChars,"/app_search_paths.pl",AbsChars),
  atom_chars(Path,PathChars),
  assert(user:file_search_path(app,Path)),
  assert(user:library_directory(app(''))),
  assert(user:library_directory(app('Resources'))),
  ensure_loaded('$GODIS/search_paths_aod').

%  assert(user:library_directory(app('ResourceInterfaces'))),
%  assert(user:library_directory(app('Modules'))),
 % assert(user:library_directory(app('General'))).

:-set_app_search_paths.