* Bugs 7948 15825 fixed: gsort() multilevel sorting
[scilab.git] / scilab / modules / graphics / macros / xinfo.sci
1 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
2 // Copyright (C) 2007 - INRIA - Jean-Baptiste Silvy
3 // Copyright (C) 2012 - 2016 - Scilab Enterprises
4 //
5 // This file is hereby licensed under the terms of the GNU GPL v2.0,
6 // pursuant to article 5.3.4 of the CeCILL v.2.1.
7 // This file was originally licensed under the terms of the CeCILL v2.1,
8 // and continues to be available under such terms.
9 // For more information, see the COPYING file which you should have received
10 // along with this program.
11
12 function xinfo( newMessage )
13     // xinfo function
14     // Set the text of the message bar of the current figure
15
16     warnobsolete("gcf().info_message", "6.1");
17
18     if argn(2)<1 then
19         error(msprintf(gettext("%s: Wrong number of input argument(s): At least %d expected.\n"), "xinfo", 1));
20     end
21
22     curFig = gcf() ;
23     curFig.info_message = newMessage ;
24
25 endfunction