Translation map for style names

Hi,

I have defined a simple outlang that produces S-expressions (see below).
However, I would like to produce shorter versions of the style identifiers,
so that "keyword" becomes "kwd", "symbol" becomes "sym", etc.  Is there any way
for the $style variable itself to be transformed via a translation map?  Or an
altogether different way of achieving this within the source-highlight library?

Thanks in advance!
Best regards,
Dario Teixeira

----------------------------------------------
onestyle "($style \"$text\")"

translations
"\"" "\\\""
end
----------------------------------------------