/* mkhelp.cmd - compile helpfile */
PARSE ARG lang
IF lang == '' THEN DO
    locale = VALUE('LANG',,'OS2ENVIRONMENT')
    SELECT
        WHEN locale == 'zh_CN' THEN lang = 'cn'
        WHEN locale == 'zh_TW' THEN lang = 'tw'
        OTHERWISE PARSE VAR locale lang '_' .
    END
END
ELSE lang = LEFT( lang, 2 )

ipflangs = 'ARA BGR CHT CZE DAN DEU ELL ENU ESP FIN FRA HEB HUN ITA JPN KOR NLD NOR POL PRC PTG RUS SVE THI TRK'
langcode = 'ar  bg  tw  cz  da  de  el  en  es  fi  fr  he  hu  it  jp  ko  nl  no  po  cn  pt  ru  sv  th  tr'
langpos  = WORDPOS( lang, langcode )
IF langpos == 0 THEN lsw = 'en'
ELSE lsw = WORD( ipflangs, langpos )

CALL VALUE 'IPFCARTWORK', 'img', 'OS2ENVIRONMENT'
'cd docs'
IF lang = 'en' THEN 'ipfc -l:'lsw 'lswitch_'lang'.ipf lswitch.hlp'
ELSE 'ipfc -l:'lsw 'lswitch_'lang'.ipf lswitch_'lang'.hlp'
'cd ..'
RETURN rc