Re: function that purges 8 bit text?

[Hans Hagen <pragma@wxs.nl>]

Henning Hraban Ramm wrote:
> Am 06.01.2005 um 12:56 schrieb Hans Hagen:
> 
>>> Is there a possibility to strip all invalid chars from a string, so that
>>> \SkillField{Erzählen}{0} can define a field named "Erzaehlen" or 
>>> "Erzhlen" or "Erzahlen"?
>>
>>
>> just make me s small test file
>> there is lots of sanitizing code/trickery out there, but need a simple 
>> self contained example
> 
> 
> Hm, it doesn't really have anything to do with my application (defining 
> widget fields), so...
> 
> \starttext
> 
> \def\MyIndex#1{\index[\CLEAN{#1}]{#1}}
> 
> \MyIndex{Ätsch} % should expand to \index[Atsch]{Ätsch} or 
> \index[Aetsch]{Ätsch}
> 
> \stoptext

it's a three line macro to do this kind of things; however, i decided to install 
yet another expansion handler,

\enableregime[windows] \setupregister[index][keyexpansion=strict]

\starttext
   \index[Ätsch]{Ätsch} test \index{QÄtsch} test \index[ratsch]{RÄtsch} test 
\placeindex
\stoptext

those who really want to know the details can look into the source and grep for 
strict in core-sys.tex

think of something: \reduceargument an accented mess\to \ascii

I will upload a new alpha version in a few hours


Hans


-----------------------------------------------------------------
                                           Hans Hagen | PRAGMA ADE
               Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
      tel: 038 477 53 69 | fax: 038 477 53 74 | www.pragma-ade.com
                                              | www.pragma-pod.nl
-----------------------------------------------------------------