workbench/c/SetLocale.c

   1 /*
   2     Copyright © 1995-2014, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: SetLocale CLI command
   6     Lang: English
   7  */
   8
   9 #include <exec/types.h>
  10 #include <dos/dos.h>
  11 #include <libraries/locale.h>
  12 #include <proto/exec.h>
  13 #include <proto/dos.h>
  14 #include <proto/locale.h>
  15
  16 int main(int argc, char **av)
  17 {
  18     LONG error;
  19     struct Locale *new;
  20
  21     if(argc != 2)
  22     {
  23         PrintFault(ERROR_REQUIRED_ARG_MISSING, "SetLocale");
  24         return RETURN_FAIL;
  25     }
  26
  27     new = OpenLocale(av[1]);
  28     error = IoErr();
  29     FPuts(Output(), "Locale opened\n");
  30     if(new)
  31     {
  32         struct Locale *old = NULL;
  33         old = LocalePrefsUpdate(new);
  34         FPuts(Output(), "Locale set\n");
  35         CloseLocale(old);
  36         CloseLocale(new);
  37     }
  38     else
  39     {
  40         PrintFault(error, "SetLocale");
  41         return RETURN_FAIL;
  42     }
  43
  44     return 0;
  45 }