--- doc/texinfo.tex.orig	2007-06-26 23:38:23.000000000 +0300
+++ doc/texinfo.tex	2007-06-26 23:46:25.000000000 +0300
@@ -3,7 +3,7 @@
 % Load plain if necessary, i.e., if running under initex.
 \expandafter\ifx\csname fmtname\endcsname\relax\input plain\fi
 %
-\def\texinfoversion{2007-06-24.14}
+\def\texinfoversion{2007-06-26.23}
 %
 % Copyright (C) 1985, 1986, 1988, 1990, 1991, 1992, 1993, 1994, 1995,
 % 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006,
@@ -6332,6 +6332,10 @@
 % all characters are catcode 10, 11 or 12, except \ which is active
 % (as in normal texinfo). It is necessary to change the definition of \.
 
+% Non-ASCII encodings make 8-bit characters active, so un-activate
+% them to avoid their expansion.  Must do this non-globally, to
+% confine the change to the current group.
+
 % It's necessary to have hard CRs when the macro is executed. This is
 % done by  making ^^M (\endlinechar) catcode 12 when reading the macro
 % body, and then making it the \newlinechar in \scanmacro.
@@ -6346,6 +6350,7 @@
   \catcode`\_=\other
   \catcode`\|=\other
   \catcode`\~=\other
+  \ifx\declaredencoding\ascii \else \setnonasciicharscatcodenonglobal\other \fi
 }
 
 \def\scanargctxt{%
@@ -7483,6 +7488,14 @@
    \repeat
 }
 
+\def\setnonasciicharscatcodenonglobal#1{%
+   \count255=128
+   \loop\ifnum\count255<256
+      \catcode\count255=#1
+      \advance\count255 by 1
+   \repeat
+}
+
 % @documentencoding sets the definition of non-ASCII characters
 % according to the specified encoding.
 %

--- ChangeLog.orig	2007-06-26 23:38:03.000000000 +0300
+++ ChangeLog	2007-06-26 23:47:30.000000000 +0300
@@ -1,3 +1,9 @@
+2007-06-26  Oleg Katsitadze  <address@hidden>
+
+	* texinfo.tex (\setnonasciicharscatcodenonglobal): new macro.
+	(\scanctxt):  in case of non-ASCII encodings, un-activate 8-bit
+	chars to avoid their expansion.
+
 2007-06-24  Karl Berry  <address@hidden>
 
 	* texinfo.tex (\internalpagesizes): must reset \pdfhorigin and