diff -uNr latex2html-2K.1beta/styles/russian.perl latex2html-2K.1beta.new/styles/russian.perl --- latex2html-2K.1beta/styles/russian.perl Thu Jan 1 03:00:00 1970 +++ latex2html-2K.1beta.new/styles/russian.perl Mon Oct 8 11:55:30 2001 @@ -0,0 +1,83 @@ +# $Id: russian.perl,v 1.1 1998/08/25 02:11:25 RRM Exp $ +# +# russian.perl for russian babel, inspired heavily by german.perl +# by Georgy Salnikov + + +package russian; + +print " [russian]"; + +sub main'russian_translation { @_[0] } + + +package main; + +if (defined &addto_languages) { &addto_languages('russian') }; + +sub russian_titles { + $toc_title = "Содержание"; + $lof_title = "Список иллюстраций"; + $lot_title = "Список таблиц"; + $idx_title = "Предметный указатель"; + $ref_title = "Список литературы"; + $bib_title = "Литература"; + $abs_title = "Аннотация"; + $app_title = "Приложение"; + $pre_title = "Предисловие"; + $foot_title = "Примечание"; + $thm_title = "Теорема"; + $fig_name = "Рис."; + $tab_name = "Таблица"; + $prf_name = "Доказательство"; + $date_name = "Дата"; + $page_name = "с."; + # Sectioning-level titles + $part_name = "Часть"; + $chapter_name = "Глава"; + $section_name = "Секция"; + $subsection_name = "Подсекция"; + $subsubsection_name = "Субподсекция"; + $paragraph_name = "Параграф"; + # Misc. strings + $child_name = "Подсекции"; + $info_title = "Об этом документе ..."; + $also_name = "см. также"; + $see_name = "см."; + # names in navigation panels + $next_name = "След."; + $up_name = "Выше"; + $prev_name = "Пред."; + # field names in email headers + $encl_name = "вкл."; + $headto_name = "вх."; + $cc_name = "исх."; + + @Month = ('', 'января', 'февраля', 'марта', 'апреля', 'мая', + 'июня', 'июля', 'августа', 'сентября', 'октября', + 'ноября', 'декабря'); + $GENERIC_WORDS = "and|the|of|for|by|a|an|to"; +} + + +sub russian_today { + local($today) = &get_date(); + $today =~ s|(\d+)/0?(\d+)/|$2 $Month[$1] |; + join('',$today,$_[0],' г.'); +} + + + +# use'em +&russian_titles; +$default_language = 'russian'; +$TITLES_LANGUAGE = 'russian'; +$russian_encoding = 'koi8-r'; + +# $Log: russian.perl,v $ +# Revision 1.1 1998/08/25 02:11:25 RRM +# Babel language support +# +# + +1; diff -uNr latex2html-2K.1beta/versions/koi8.pl latex2html-2K.1beta.new/versions/koi8.pl --- latex2html-2K.1beta/versions/koi8.pl Thu Jan 1 03:00:00 1970 +++ latex2html-2K.1beta.new/versions/koi8.pl Mon Oct 8 11:55:30 2001 @@ -0,0 +1,206 @@ +### File: koi8.pl +### Version 0.1, April 17, 2001 +### Edited by Georgy Salnikov from latin1.pl +### +### KOI8-R encoding information +### +### extracted from the latex2html script ... +### Language definitions for HTML 2.1 (I18N, Internationalization) +### Written by Marcus E. Hennecke +### Version 0.3, March 6, 1996 +### Version 0.2, February 2, 1996 + +## Copyright (C) 1995 by Marcus E. Hennecke +## This program is free software; you can redistribute it and/or modify +## it under the terms of the GNU General Public License as published by +## the Free Software Foundation; either version 2 of the License, or +## (at your option) any later version. + +## This program is distributed in the hope that it will be useful, +## but WITHOUT ANY WARRANTY; without even the implied warranty of +## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +## GNU General Public License for more details. +## You should have received a copy of the GNU General Public License +## along with this program; if not, write to the Free Software +## Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. +# +# +# + +$CHARSET = "koi8-r"; +$INPUTENC = '' unless ($INPUTENC); # empty implies 'koi8-r' + +#Character ranges for lower --> upper-case conversion + +$sclower = "\\243-\\243\\300-\\337"; +$scupper = "\\263-\\263\\340-\\377"; + +%low_entities = ( '163', '179' + ,'192', '224' + ,'193', '225' + ,'194', '226' + ,'195', '227' + ,'196', '228' + ,'197', '229' + ,'198', '230' + ,'199', '231' + ,'200', '232' + ,'201', '233' + ,'202', '234' + ,'203', '235' + ,'204', '236' + ,'205', '237' + ,'206', '238' + ,'207', '239' + ,'208', '240' + ,'209', '241' + ,'210', '242' + ,'211', '243' + ,'212', '244' + ,'213', '245' + ,'214', '246' + ,'215', '247' + ,'216', '248' + ,'217', '249' + ,'218', '250' + ,'219', '251' + ,'220', '252' + ,'221', '253' + ,'222', '254' + ,'223', '255' +); + + +sub do_cmd_textonequarter { join('', &iso_map("frac14", ""), $_[0]);} +sub do_cmd_textonehalf { join('', &iso_map("frac12", ""), $_[0]);} +sub do_cmd_textthreequarters { join('', &iso_map("frac34", ""), $_[0]);} +sub do_cmd_textcent { join('', &iso_map("cent", ""), $_[0]);} +sub do_cmd_textyen { join('', &iso_map("yen", ""), $_[0]);} +sub do_cmd_textcurrency { join('', &iso_map("curren", ""), $_[0]);} +sub do_cmd_textbrokenbar { join('', &iso_map("brvbar", ""), $_[0]);} +sub do_cmd_textregistered { join('', &iso_map("reg", ""), $_[0]);} +sub do_cmd_textexclamdown { join('', &iso_map("iexcl", ""), $_[0]);} +sub do_cmd_textquestiondown { join('', &iso_map("iquest", ""), $_[0]);} +sub do_cmd_textperiodcentered { join('', &iso_map("middot", ""), $_[0]);} +sub do_cmd_guillemotleft { join('', &iso_map("laquo", ""), $_[0]);} +sub do_cmd_guillemotright { join('', &iso_map("raquo", ""), $_[0]);} + +sub do_cmd_mathdegree { join('', &iso_map("deg", ""), $_[0]);} +sub do_cmd_mathonesuperior { join('', &iso_map("sup1", ""), $_[0]);} +sub do_cmd_mathtwosuperior { join('', &iso_map("sup2", ""), $_[0]);} +sub do_cmd_mathordmasculine { join('', &iso_map("ordm", ""), $_[0]);} +sub do_cmd_mathordfeminine { join('', &iso_map("ordf", ""), $_[0]);} + +sub do_cmd_P { join('', &iso_map("para", ""), $_[0]);} +sub do_cmd_S { join('', &iso_map("sect", ""), $_[0]);} + +sub do_cmd_pm { join('', &iso_map("plusmn", ""), $_[0]);} +sub do_cmd_copyright { join('', &iso_map("copy", ""), $_[0]);} +sub do_cmd_cents { join('', &iso_map("cent", ""), $_[0]);} +sub do_cmd_lnot { join('', &iso_map("not", ""), $_[0]);} +sub do_cmd_cdot { join('', &iso_map("middot", ""), $_[0]);} +sub do_cmd_micron { join('', &iso_map("micro", ""), $_[0]);} + +%iso_8859_1_character_map + = ( + 'amp', '&', # ampersand + 'gt', '>', # greater than + 'lt', '<', # less than + 'quot', '"', # double quote + +# These have HTML mnemonic names for HTML 4.0 ... + 'nbsp', ' ', # non-breaking space + 'iexcl', '¡', # exclamation mark - upside down + 'cent', '¢', # cents sign + 'curren', '¤', # currency sign + 'yen', '¥', # Yen sign + 'brvbar', '¦', + 'sect', '§', # section mark + 'copy', '©', # copyright mark + 'ordf', 'ª', + 'ordm', 'º', + 'laquo', '«', + 'raquo', '»', + 'not', '¬', + 'shy', '­', + 'reg', '®', + 'deg', '°', + 'plusmn', '±', + 'sup1', '¹', + 'sup2', '²', + 'micro', 'µ', + 'para', '¶', # paragraph mark + 'middot', '·', + 'frac14', '¼', + 'frac12', '½', + 'frac34', '¾', + 'iquest', '¿', # question mark - upside down + +# These are character types without arguments ... + 'grave' , "`", + 'acute' , "´", + 'circ', '^', + 'tilde', '~', + 'dot', '.', + 'uml', '¨', + 'macr' , '¯', + 'dblac', "´´", + 'cedil', "¸" + ); + +%iso_8859_1_character_map_inv = + ( + '^' , '\\^{}', + '>' , '\\ensuremath{>}', + '<' , '\\ensuremath{<}', + '&' , '\\&', + '~' , '\\~{}', + ' ' , '\\nobreakspace{}', + '¡' , '!`', + '¢' , '\\textcent{}', + '¤' , '\\textcurrency{}', + '¥' , '\\textyen{}', + '¦' , '\\textbrokenbar{}', + '§' , '\\S{}', + '¨' , '\\"{}', + '©' , '\\copyright{}', + 'ª' , '\\ensuremath{^{a}}', + '«' , '\\guillemotleft{}', + '¬' , '\\ensuremath{\\lnot{}}', + '­' , '\\-', + '®' , '\\ensuremath{\\circledR}', + '¯' , '\\={}', + '°' , '\\ensuremath{^{\\circ}}', + '±' , '\\ensuremath{\\pm}', + '²' , '\\ensuremath{^{2}}', + '´' , '\\\'{}', + 'µ' , '\\ensuremath{\\mu}', + '¶' , '\\P{}', + '·' , '\\cdot{}', + '¸' , '\\c{ }', + '¹' , '\\ensuremath{^{1}}', + 'º' , '\\ensuremath{^{o}}', + '»' , '\\guillemotright{}', + '¼' , '\\ensuremath{\\frac{1}{4}}', + '½' , '\\ensuremath{\\frac{1}{2}}', + '¾' , '\\ensuremath{\\frac{3}{4}}', + '¿' , '?`' +); + +1; + + + + + +