texinfo/info info-utils.c,1.2,1.3

[dirt]

Update of /cvsroot/texinfo/texinfo/info
In directory sheep:/tmp/cvs-serv24586/info

Modified Files:
        info-utils.c 
Log Message:
2004-02-05  Alper Ersoy  <address@hidden>

        * info/info-utils.c (info_parse_node): look for ``(line '' instead of
        skipping any non-digit characters. 



Index: info-utils.c
===================================================================
RCS file: /cvsroot/texinfo/texinfo/info/info-utils.c,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** info-utils.c        3 Feb 2004 12:04:49 -0000       1.2
--- info-utils.c        5 Feb 2004 00:29:29 -0000       1.3
***************
*** 102,109 ****
      }
  
!   /* Parse ``(line ...)'' here.  This only reads digits inside
!      the parenthesis, so translated documents should work ok
!      (provided that translated ``line'' does not contain digits,
!      of course.)  */
    {
      char *rest = (char *) (string + i + 1);
--- 102,106 ----
      }
  
!   /* Parse ``(line ...)'' part of menus, if any.  */
    {
      char *rest = (char *) (string + i + 1);
***************
*** 123,130 ****
      /* Are we looking at an opening parenthesis?  That can only mean
         we have a winner. :)  */
!     if (*rest == '(')
        {
!         while (strchr ("0123456789", *rest) == NULL)
!           rest++;
          info_parsed_line_number = strtol (rest, NULL, 0);
        }
--- 120,126 ----
      /* Are we looking at an opening parenthesis?  That can only mean
         we have a winner. :)  */
!     if (strncmp (rest, "(line ", strlen ("(line ")) == 0)
        {
!         rest += strlen ("(line ");
          info_parsed_line_number = strtol (rest, NULL, 0);
        }