toolbox_skeleton: fix isdir() typo on loaders
[scilab.git] / scilab / contrib / toolbox_skeleton / etc / toolbox_skeleton.start
1 // Copyright (C) 2008 - INRIA
2 // Copyright (C) 2009 - DIGITEO
3
4 // This file is released under the 3-clause BSD license. See COPYING-BSD.
5
6 function toolbox_skeletonlib = startModule()
7
8     TOOLBOX_NAME  = "toolbox_skeleton";
9     TOOLBOX_TITLE = "Toolbox Skeleton";
10
11   mprintf("Start " + TOOLBOX_TITLE + "\n");
12
13   if isdef("toolbox_skeletonlib") then
14     warning("Toolbox skeleton library is already loaded");
15     return;
16   end
17
18   etc_tlbx  = get_absolute_file_path("toolbox_skeleton.start");
19   etc_tlbx  = getshortpathname(etc_tlbx);
20   root_tlbx = strncpy( etc_tlbx, length(etc_tlbx)-length("\etc\") );
21
22 //Load  functions library
23 // =============================================================================
24   mprintf("\tLoad macros\n");
25   pathmacros = pathconvert( root_tlbx ) + "macros" + filesep();
26   toolbox_skeletonlib = lib(pathmacros);
27
28 // load gateways and Java libraries
29 // =============================================================================
30   verboseMode = ilib_verbose();
31   ilib_verbose(0);
32   mprintf("\tLoad gateways\n");
33   exec(pathconvert(root_tlbx+"/sci_gateway/loader_gateway.sce",%f));
34   mprintf("\tLoad Java libraries\n");
35   exec(pathconvert(root_tlbx+"/src/java/loader.sce",%f));
36   ilib_verbose(verboseMode);
37
38 // load localization
39   addlocalizationdomain(TOOLBOX_NAME, root_tlbx + "/locales");
40
41 // Load and add help chapter
42 // =============================================================================
43   if or(getscilabmode() == ["NW";"STD"]) then
44     mprintf("\tLoad help\n");
45     path_addchapter = pathconvert(root_tlbx+"/jar");
46     if isdir(path_addchapter) then
47       add_help_chapter(TOOLBOX_NAME, path_addchapter, %F);
48     end
49   end
50
51 // Load demos
52 // =============================================================================
53   if or(getscilabmode() == ["NW";"STD"]) then
54     mprintf("\tLoad demos\n");
55     pathdemos = pathconvert(root_tlbx+"/demos/toolbox_skeleton.dem.gateway.sce", %F, %T);
56     add_demo(TOOLBOX_TITLE, pathdemos);
57   end
58
59 // Load Preferences GUI
60 // =============================================================================
61   if getscilabmode() == "STD" then
62     addModulePreferences(TOOLBOX_TITLE, root_tlbx, etc_tlbx + "toolbox_skeleton_preferences.xml");
63   end
64
65 endfunction
66
67 toolbox_skeletonlib = startModule();
68 clear startModule; // remove startModule on stack