$OpenBSD: patch-texk_web2c_etexdir_etex_ch,v 1.1 2011/11/23 12:00:45 edd Exp $

line number fix on 2011 stable branch: http://tug.org/pipermail/tldistro/2011q4/000148.html

--- texk/web2c/etexdir/etex.ch.origy	Thu Apr  7 13:06:18 2011
+++ texk/web2c/etexdir/etex.ch	Sat Oct  1 13:48:55 2011
@@ -871,10 +871,9 @@ corresponding token types must precede |write_text|.
 @x [22] m.313 l.6809 - e-TeX scan_tokens
 else  begin print_nl("l."); print_int(line);
 @y
-else if index<>in_open then {input from a pseudo file}
-  begin print_nl("l."); print_int(line_stack[index+1]);
-  end
-else  begin print_nl("l."); print_int(line);
+else  begin print_nl("l.");
+  if index=in_open then print_int(line)
+  else print_int(line_stack[index+1]); {input from a pseudo file}
 @z
 %---------------------------------------
 @x [22] m.314 l.6831 - e-TeX basic
