1 files changed, 49 insertions, 34 deletions

diff --git a/tex/context/base/enco-ans.tex b/tex/context/base/enco-ans.tex
index a4d255202..6bd7df7bf 100644
--- a/tex/context/base/enco-ans.tex
+++ b/tex/context/base/enco-ans.tex
@@ -8,16 +8,18 @@
 %D    copyright=PRAGMA-ADE]
 %C
 %C This module is part of the \CONTEXT\ macro||package and is
-%C therefore copyrighted by \PRAGMA. See mreadme.pdf for 
-%C details. 
+%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
+%C details.
 
-%D This is \YandY's texnansi encoding vector, which combines 
-%D the best of the ansi encoding vector (prebuilt accented 
-%D characters etc.) and some of \TEX's vectors. 
+%D This is \YandY's texnansi encoding vector, which combines
+%D the best of the ansi encoding vector (prebuilt accented
+%D characters etc.) and some of \TEX's vectors.
 
-\startmapping[texnansi] 
+\startmapping[texnansi]
 
-\definecasemap 228 228 196 \definecasemap 196 228 196  
+\definecasemap 231 231 199 \definecasemap 199 231 199
+
+\definecasemap 228 228 196 \definecasemap 196 228 196
 \definecasemap 235 235 203 \definecasemap 203 235 203
 \definecasemap 239 239 207 \definecasemap 207 239 207
 \definecasemap 246 246 214 \definecasemap 214 246 214
@@ -47,8 +49,21 @@
 \definecasemap 241 241 209 \definecasemap 209 241 209
 \definecasemap 245 245 213 \definecasemap 213 245 213
 
-\definecasemap 240 240 208 \definecasemap 208 240 208  
-\definecasemap 254 254 222 \definecasemap 222 254 222  
+\definecasemap 240 240 208 \definecasemap 208 240 208
+\definecasemap 254 254 222 \definecasemap 222 254 222
+
+% needed by some patterns:
+
+% \definecaseself  34 % quotedbl
+% \definecaseself 132 % quotedblbase
+% \definecaseself 147 % quotedblleft
+% \definecaseself 148 % quotedblright
+% \definecaseself 129 % quotesingle
+% \definecaseself 130 % quotesinglebase
+% \definecaseself 145 % quoteleft
+% \definecaseself 146 % quoteright
+
+\definecaseself 223
 
 \stopmapping
 
@@ -57,18 +72,18 @@
 \definecharacter textacute         19
 \definecharacter textbreve         21
 \definecharacter textcaron         20
-\definecharacter textcedilla      184  
+\definecharacter textcedilla      184
 \definecharacter textcircumflex    94 % 136
 \definecharacter textdiaeresis    168
 \definecharacter textdotaccent      5
 \definecharacter textgrave         18
 \definecharacter texthungarumlaut   6
-\definecharacter textmacron       175 
+\definecharacter textmacron       175
 \definecharacter textogonek         7
 \definecharacter textring          23
 \definecharacter texttilde        152
 
-\definecharacter dotlessi          16 % 105 
+\definecharacter dotlessi          16 % 105
 \definecharacter dotlessj          17
 
 \definecharacter endash           150 % lig
@@ -106,30 +121,30 @@
 \definecharacter threesuperior    179
 
 \definecharacter textcent         162 % ?
-\definecharacter textcurrency     164 
+\definecharacter textcurrency     164
 \definecharacter texteuro           1
 \definecharacter textflorin       131
 \definecharacter textsterling     163
-\definecharacter textyen          165 
+\definecharacter textyen          165
 
 \definecharacter percent           37
 \definecharacter perthousand      137
 
-\definecharacter softhyphen        45 
+\definecharacter softhyphen        45
 \definecharacter periodcentered   183
 
-\definecharacter textasciicircum  142 
+\definecharacter textasciicircum  142
 \definecharacter textasciitilde   158
-\definecharacter textbackslash     92  
-\definecharacter textbraceleft    123 
-\definecharacter textbraceright   125 
+\definecharacter textbackslash     92
+\definecharacter textbraceleft    123
+\definecharacter textbraceright   125
 \definecharacter textunderscore    95
 
-\definecharacter textbrokenbar    166 
+\definecharacter textbrokenbar    166
 \definecharacter textbullet       149
 \definecharacter textdag          134
 \definecharacter textddag         135
-\definecharacter textdegree       176 
+\definecharacter textdegree       176
 \definecharacter textdiv          247
 \definecharacter textellipsis     133
 \definecharacter textfraction       4
@@ -145,13 +160,13 @@
 \definecharacter quotedblright    148
 
 \definecharacter quotesingle      129
-\definecharacter quotesinglebase  130 
+\definecharacter quotesinglebase  130
 
 \definecharacter quoteleft        145
 \definecharacter quoteright       146
 
-\definecharacter guilsingleleft   139 
-\definecharacter guilsingleright  155 
+\definecharacter guilsingleleft   139
+\definecharacter guilsingleright  155
 \definecharacter leftguillemot    171
 \definecharacter rightguillemot   187
 
@@ -187,9 +202,9 @@
 \definecharacter ucircumflex      251
 \definecharacter Ucircumflex      219
 
-\definecharacter adiaeresis       228      
-\definecharacter Adiaeresis       196      
-\definecharacter ediaeresis       235      
+\definecharacter adiaeresis       228
+\definecharacter Adiaeresis       196
+\definecharacter ediaeresis       235
 \definecharacter Ediaeresis       203
 \definecharacter idiaeresis       239
 \definecharacter Idiaeresis       207
@@ -228,16 +243,16 @@
 
 \stopencoding
 
-% will be replaced by math collection, fails anyway 
+% will be replaced by math collection, fails anyway
 
 \startencoding[texnansi]
 
-\definecharacter mathgrave       "7060 
-\definecharacter mathacute       "70B4 
-\definecharacter mathhat         "7088 
-\definecharacter mathtilde       "7098 
-\definecharacter mathddot        "70A8 
-\definecharacter mathbar         "70AF 
+\definecharacter mathgrave       "7060
+\definecharacter mathacute       "70B4
+\definecharacter mathhat         "7088
+\definecharacter mathtilde       "7098
+\definecharacter mathddot        "70A8
+\definecharacter mathbar         "70AF
 
 \stopencoding