6919f132bf9c82660ab9f7a4dc819baf27154330
[scilab.git] / scilab / modules / atoms / macros / atoms_internals / atomsGetHomeListboxElts.sci
1 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
2 // Copyright (C) 2009 - DIGITEO - Vincent COUVERT <vincent.couvert@scilab.org>
3 // Copyright (C) 2009-2010 - DIGITEO - Pierre MARECHAL <pierre.marechal@scilab.org>
4 // Copyright (C) 2013 - Samuel GOUGEON
5 //
6 // This file must be used under the terms of the CeCILL.
7 // This source file is licensed as described in the file COPYING, which
8 // you should have received as part of this distribution. The terms
9 // are also available at
10 // http://www.cecill.info/licences/Licence_CeCILL_V2.1-en.txt
11
12 function elements = atomsGetHomeListboxElts()
13     items_str  = [];
14     items_mat  = [];
15
16     installed  = atomsGetInstalled();
17     tmp = atomsAutoloadList("all")
18     autoloaded = tmp(:,1)
19     if ~isempty(get("atomsFigure")) then
20         allModules = get("atomsFigure", "UserData");
21
22         items_str  = atomsSetInstalledList(installed)
23         items_mat = installed(:,1)
24         items_mat = [emptystr(items_mat)+"module" items_mat ]
25
26         if items_str==[] then
27             elements("items_str") = "";
28         else
29             elements("items_str") = items_str;
30         end
31
32         elements("items_mat") = items_mat;
33     else
34         elements = [];
35     end
36 endfunction