texinfo/makeinfo cmds.c,1.24,1.25

[dirt]

Update of /cvsroot/texinfo/texinfo/makeinfo
In directory sheep:/tmp/cvs-serv3911/makeinfo

Modified Files:
        cmds.c 
Log Message:
2004-01-31  Alper Ersoy  <address@hidden>

        * makeinfo/cmds.c (cm_TeX, cm_LaTeX): warn if there are any arguments.



Index: cmds.c
===================================================================
RCS file: /cvsroot/texinfo/texinfo/makeinfo/cmds.c,v
retrieving revision 1.24
retrieving revision 1.25
diff -C2 -d -r1.24 -r1.25
*** cmds.c      25 Jan 2004 14:26:48 -0000      1.24
--- cmds.c      31 Jan 2004 14:33:17 -0000      1.25
***************
*** 545,555 ****
       int arg;
  {
    if (arg == START)
      {
!       if (xml && ! docbook)
        xml_insert_entity ("tex");
        else
        add_word ("TeX");
      }
  }
  
--- 545,561 ----
       int arg;
  {
+   static int last_position;
+ 
    if (arg == START)
      {
!       if (xml && !docbook)
        xml_insert_entity ("tex");
        else
        add_word ("TeX");
+ 
+       last_position = output_paragraph_offset;
      }
+   else if (last_position != output_paragraph_offset)
+     warning (_("arguments to @%s ignored"), command);
  }
  
***************
*** 559,562 ****
--- 565,570 ----
       int arg;
  {
+   static int last_position;
+ 
    if (arg == START)
      {
***************
*** 565,569 ****
--- 573,581 ----
        else
          add_word ("LaTeX");
+ 
+       last_position = output_paragraph_offset;
      }
+   else if (last_position != output_paragraph_offset)
+     warning (_("arguments to @%s ignored"), command);
  }