# $Header: /data/cvsroot/mail/elmme+/ConfTool/CharMap,v 1.11 2000/10/28 16:34:18 hurtta Exp $
result="(unsupported)"
extra=""
case "$charmap" in
	cp367|CP367|ASCII|ISO646-US|IBM367)
		result=US-ASCII
		;;
	CP819|IBM819|ISO_8859-1|cp819)
		result=ISO-8859-1
		;;
	IBM00858|CCSID00858|CP00858|"PC-Multilingual-850+euro")
		# "IBM00858" is registered
		# Unsupported by Elm ME+
		result=IBM00858
		;;
	IBM00924|CCSID00924|CP00924|ebcdic-Latin9--euro)
		# "IBM00924" is registered
		# Unsupported by Elm ME+ (can not use on MIME)
		result=IBM00924
		;;
	IBM01140|CCSID01140|CP01140|"ebcdic-us-37+euro")
		# "IBM01140" is registered
		# Unsupported by Elm ME+ (can not use on MIME)
		result=IBM01140
		;;
	IBM01141|CCSID01141|CP01141|"ebcdic-de-273+euro")
		# "IBM01141" is registered
		# Unsupported by Elm ME+ (can not use on MIME)
		result=IBM01141
		;;
	IBM01142|CCSID01142|CP01142|"ebcdic-dk-277+euro"|"ebcdic-no-277+euro")
		# "IBM01142" is registered
		# Unsupported by Elm ME+ (can not use on MIME)
		result=IBM01142
		;;
	IBM01143|CCSID01143|CP01143|"ebcdic-fi-278+euro")
		# "IBM01143" is registered
		# Unsupported by Elm ME+ (can not use on MIME)
		result=IBM01143
		;;
	IBM01144|CCSID01144|CP01144|"ebcdic-it-280+euro")
		# "IBM01144" is registered
		# Unsupported by Elm ME+ (can not use on MIME)
		result=IBM01144
		;;
	IBM01145|CCSID01145|CP01145|"ebcdic-es-284+euro")
		# "IBM01145" is registered
		# Unsupported by Elm ME+ (can not use on MIME)
		result=IBM01145
		;;
	IBM01146|CCSID01146|CP01146|"ebcdic-gb-285+euro")
		# "IBM01146" is registered
		# Unsupported by Elm ME+ (can not use on MIME)
		result=IBM01146
		;;
	IBM01147|CCSID01147|CP01147|"ebcdic-fr-297+euro")
		# "IBM01147" is registered
		# Unsupported by Elm ME+ (can not use on MIME)
		result=IBM01147
		;;
	IBM01148|CCSID01148|"ebcdic-international-500+euro")
		# "IBM01148" is registered
		# Unsupported by Elm ME+ (can not use on MIME)
		result=IBM01148
		;;
	IBM01149|CCSID01149|CP01149|"ebcdic-is-871+euro")
		# "IBM01149" is registered
		# Unsupported by Elm ME+ (can not use on MIME)
		result=IBM01149
		;;
	SCSU)
		# "SCSU" is registered
		# Unsupported by Elm ME+ (can not use on MIME)
		# Encoding of Unicode
		result=SCSU
		;;
	UTF-16)
		# "UTF-16" is registered
		# RFC 2781
		# Unsupported by Elm ME+ (can not use on MIME)
		# Encoding of Unicode
		result=UTF-16
		;;
	UTF-16BE)
		# "UTF-16BE" is registered
		# RFC 2781
		# Unsupported by Elm ME+ (can not use on MIME)
		# Encoding of Unicode
		result=UTF-16BE
		;;
	UTF-16LE)
		# "UTF-16LE" is registered
		# RFC 2781
		# Unsupported by Elm ME+ (can not use on MIME)
		# Encoding of Unicode
		result=UTF-16LE
		;;
	ibm775|IBM775|cp775|CP775|csPC775Baltic)
		# "IBM775" is registered
		result=IBM775
		;;
	ibm866|IBM866|CP866|csIBM866|866)
		# "IBM866" is registered
		result=IBM866
		;;
	iso-8859-13|ISO-8859-13|ISO_8859-13)
		# "iso-8859-13" is registered		
		result=ISO-8859-13
		;;
	iso-8859-14|ISO-8859-14|iso-ir-199|"ISO_8859-14:1998"|latin8|iso-celtic|l8)
		# "iso-8859-14" is registered
		result=ISO-8859-14
		;;
	windows-1250|Windows-1250|CP1250|cp1250|IBM1250)
		# "Windows-1250" is registered
		result=Windows-1250   
		;;
	windows-1251|Windows-1251|CP1251|cp1251|IBM1251)
		# "Windows-1251" is registered
		result=Windows-1251
		;;
	windows-1252|Windows-1252|CP1252|cp1252|IBM1252)
		# "windows-1252" is registered
		result=windows-1252
		;;
	windows-1253|Windows-1253|CP1253|cp1253|IBM1253)
		# "Windows-1253" is registered
		result=Windows-1253
		;;
	windows-1254|Windows-1254|CP1254|cp1254|IBM1254)
		# "Windows-1254" is registered
		result=Windows-1254
		;;
	windows-1255|Windows-1255|CP1255|IBM1255)
		# "Windows-1255" is registered
		result=Windows-1255
		;;
	windows-1256|Windows-1256|CP1256|cp1256|IBM1256)
		# "Windows-1256" is registered
		result=Windows-1256
		;;
	windows-1257|Windows-1257|CP1257|cp1257|IBM1257)
		# "Windows-1257" is registered
		result=Windows-1257
		;;
	windows-1258|Windows-1258|CP1258|cp1258|IBM1258)
		# "Windows-1258" is registered
		result=Windows-1258
		;;
	CP0[0-9][0-9])
		result="`echo \"$charmap\"|$sed 's/^CP/IBM/'`"
		;;
	cp0[0-9][0-9])
               	result="`echo \"$charmap\"|$sed 's/^cp/IBM/'`"
		;;
	CP[1-9]*)	
		result="`echo \"$charmap\"|$sed 's/^CP/cp/'`"	
		;;
	cp[1-9]*)
		result="$charmap"
		;;
	IBM[0-9]*)
		result="$charmap"
		;;
	ISO_8859-[1-9]*)
		result="`echo \"$charmap\"|$sed 's/^ISO_/ISO-/; s/:.*$//; s/,.*$//'`"
		extra="`echo \"$charmap\"|$sed 's/:.*$//; s/,.*$//'`"
		;;
	ISO8859-[1-9]*)
		result="`echo \"$charmap\"|$sed 's/^ISO/ISO-/; s/:.*$//; s/,.*$//'`"
		extra="`echo \"$charmap\"|$sed 's/:.*$//; s/,.*$//'`"
		;;
	ISO-8859-[1-9]*)
		result="`echo \"$charmap\"|$sed 's/:.*$//; s/,.*$//'`"
		extra="`echo \"$charmap\"|$sed 's/:.*$//; s/,.*$//'`"
		;;
	hp-roman8|HP-ROMAN8)
		result=hp-roman8
		;;
	"ISO_646.IRV,1983"|IRV|"ISO_646.irv:1983")
		result=IRV
		;;
	"ISO_646.IRV,1991"|"ISO_646.irv:1991")
		result=US-ASCII
		;;
	INVARIANT)
		result="$charmap"
		;;
	ISO-2022-*)
		# These are unsupported, but now we can indicate charset
		result="$charmap"
		;;
	EUC-KR|EUC-JP)
		# These are unsupported, but now we can indicate charset
		result="$charmap"
		;;
	KOI-8R)
		result=KOI8-R
		;;
	KOI8-*)
		result="$charmap"
		;;
	Big5-HKSCS)
		# "Big5-HKSCS" is registered
		# These are unsupported, but now we can indicate charset
		result="$charmap"
		;;
	tis-620|TIS-620)
		# "TIS-620" is registered
		# These are unsupported, but now we can indicate charset
		result=TIS-620
		;;
	esac
if $test "$extra" = "$charmap" ; then
	extra=
fi

