1/*****************************************************************************
    2 * This file is part of the Prolog Development Tool (PDT)
    3 * 
    4 * WWW: http://sewiki.iai.uni-bonn.de/research/pdt/start
    5 * Mail: pdt@lists.iai.uni-bonn.de
    6 * Copyright (C): 2004-2012, CS Dept. III, University of Bonn
    7 * 
    8 * All rights reserved. This program is  made available under the terms
    9 * of the Eclipse Public License v1.0 which accompanies this distribution,
   10 * and is available at http://www.eclipse.org/legal/epl-v10.html
   11 * 
   12 ****************************************************************************/
   13
   14:- multifile(logtalk_library_path/2).   15:- dynamic(logtalk_library_path/2).   16logtalk_library_path(pdt_pl, Library) :-
   17	absolute_file_name(pdt_pl('editor/lgt/loader.pl'), FilePath),
   18	file_directory_name(FilePath,Directory),
   19	atom_concat(Directory, '/', Library).
   20
   21load_lgt_editor_adapter :-
   22    (current_predicate(user:logtalk_load/1)
   23    -> logtalk_load([
   24			pdt_pl(logtalk_editor_adapter)
   25       ])
   26	;  true
   27	).
   28	
   29:- initialization( load_lgt_editor_adapter ).