scilab/modules/xcos/tests/unit_tests/scicos_filesassociation.unix.dia.ref

   1 // =============================================================================
   2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
   3 // Copyright (C) 2005-2008 - INRIA - Allan CORNET <allan.cornet@inria.fr>
   4 // Copyright (C) 2005-2008 - INRIA - Pierre MARECHAL <pierre.marechal@inria.fr>
   5 //
   6 //  This file is distributed under the same license as the Scilab package.
   7 // =============================================================================
   8 if getos() == 'Windows' then
   9   ierr = execstr('res = winqueryreg(''HKEY_CLASSES_ROOT'',''Scilab5.cos'')','errcatch');
  10   if ierr <> 0 then bugmes();quit;end
  11   ierr = execstr('res = winqueryreg(''HKEY_CLASSES_ROOT'',''Scilab5.cosf'')','errcatch');
  12   if ierr <> 0 then bugmes();quit;end
  13 end