Commit 106e96bd authored by Eli Zaretskii's avatar Eli Zaretskii

(cp770-decode-table)

(cp773-decode-table, cp774-decode-table): New variables.
parent abaddb98
2001-03-06 Eli Zaretskii <eliz@is.elta.co.il>
* international/codepage.el (cp770-decode-table)
(cp773-decode-table, cp774-decode-table): New variables.
* man.el (Man-hyphenated-reference-regexp): New variable.
(Man-build-references-alist): Use it to search for referenced
manpages. If hyphenated is non-nil, record a concatenated word in
......
......@@ -416,15 +416,52 @@ character is generated by (make-char CHARSET OFFSET)."
(setplist 'cp737-decode-table
'(charset greek-iso8859-7 language "Greek" offset 160))
;; Conversion from codepage 775 to Latin-4 for Baltic countries.
;; Conversion from codepages 770-775 to Latin-4 for Baltic countries.
;; FIXME: Once we support Latin-7, these should be remapped into it.
(defvar cp770-decode-table
[
255 143 nil nil 155 nil 156 nil 157 159 137 168 nil 196 146 nil
248 133 nil nil nil nil 134 nil nil 158 136 152 nil nil 145 nil
160 nil nil nil 142 nil nil 173 128 nil 139 nil 144 nil nil 161
nil nil nil 163 nil 149 153 nil nil 167 nil nil 154 nil 166 225
131 nil nil nil 132 nil nil 141 135 nil 138 nil 130 nil nil 140
nil nil nil 162 nil 147 148 247 nil 151 nil nil 129 nil 150 nil]
"Table for converting ISO-8859-4 characters into codepage 770 glyphs.")
(setplist 'cp770-decode-table
'(charset latin-iso8859-4 language "Latin-4" offset 160))
(defvar cp773-decode-table
[
255 220 nil 138 150 nil 234 190 166 246 237 149 173 196 252 nil
208 nil nil 139 239 nil 235 nil nil 247 137 133 136 nil 253 nil
160 nil nil nil 142 143 146 244 222 144 240 nil 242 nil nil 161
nil 238 226 232 nil 229 153 158 157 248 nil nil 154 nil 250 225
131 nil nil nil 132 134 145 245 223 130 241 nil 243 nil nil 140
nil 236 147 233 nil 228 148 198 155 249 nil nil 129 nil 251 nil]
"Table for converting ISO-8859-4 characters into codepage 773 glyphs.")
(setplist 'cp773-decode-table
'(charset latin-iso8859-4 language "Latin-4" offset 160))
(defvar cp774-decode-table
[
255 181 nil nil 155 nil nil nil 245 190 nil nil nil 196 207 nil
248 208 nil nil nil nil nil nil nil 213 nil nil nil nil 216 nil
nil nil nil nil 142 143 146 189 182 144 183 nil 184 nil nil nil
nil nil nil nil nil nil 153 nil nil 198 nil nil 154 nil 199 225
nil 160 nil nil 132 134 145 212 209 130 210 137 211 161 140 nil
nil nil nil nil 147 nil 148 246 237 214 163 150 129 nil 215 248]
"Table for converting ISO-8859-4 characters into codepage 774 glyphs.")
(setplist 'cp774-decode-table
'(charset latin-iso8859-4 language "Latin-4" offset 160))
(defvar cp775-decode-table
[
255 181 nil 138 150 nil 234 245 166 190 237 149 173 240 207 nil
248 208 nil 139 239 nil 235 nil nil 213 137 133 nil nil 216 nil
248 208 nil 139 239 nil 235 nil nil 213 137 133 136 nil 216 nil
160 nil nil nil 142 143 146 189 182 144 183 nil 184 nil nil 161
nil 238 226 232 nil 229 153 158 157 198 nil nil 154 nil 199 225
131 nil nil nil 132 134 145 212 209 130 210 nil 211 nil nil 140
nil 236 147 233 nil 228 148 nil 155 214 nil nil 129 nil 215 nil]
nil 236 147 233 nil 228 148 247 155 214 nil nil 129 nil 215 nil]
"Table for converting ISO-8859-4 characters into codepage 775 glyphs.")
(setplist 'cp775-decode-table
'(charset latin-iso8859-4 language "Latin-4" offset 160))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment