% GoDiS :- ensure_loaded('$GODIS/search_paths_aod'). :- 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'))). :-set_app_search_paths.