Mercurial > emacs

comparison lisp/textmodes/texnfo-upd.el @ 43612:15a51e54d11d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(texinfo-start-menu-description): Remove extra paren in regexp.
author Andreas Schwab <schwab@suse.de>
date Fri, 01 Mar 2002 16:02:00 +0000
parents 5288b3225c40
children 77676c41d6fb
comparison
equal deleted inserted replaced
43611:cfb42be3205d 43612:15a51e54d11d
1 ;;; texnfo-upd.el --- utilities for updating nodes and menus in Texinfo files 1 ;;; texnfo-upd.el --- utilities for updating nodes and menus in Texinfo files
2 2
3 ;; Copyright (C) 1989, 1990, 1991, 1992, 2001 Free Software Foundation, Inc. 3 ;; Copyright (C) 1989, 1990, 1991, 1992, 2001, 2002 Free Software Foundation, Inc.
4 4
5 ;; Author: Robert J. Chassell 5 ;; Author: Robert J. Chassell
6 ;; Maintainer: bug-texinfo@gnu.org 6 ;; Maintainer: bug-texinfo@gnu.org
7 ;; Keywords: maint, tex, docs 7 ;; Keywords: maint, tex, docs
8 8
763 "\\|" ; or 763 "\\|" ; or
764 "\\(^@ifinfo[ ]*\n\\)" ; ifinfo line, if any 764 "\\(^@ifinfo[ ]*\n\\)" ; ifinfo line, if any
765 "\\|" ; or 765 "\\|" ; or
766 "\\(^@ifnottex[ ]*\n\\)" ; ifnottex line, if any 766 "\\(^@ifnottex[ ]*\n\\)" ; ifnottex line, if any
767 "\\)?" ; end of expression 767 "\\)?" ; end of expression
768 "\\)?") 768 )
769 nil t) 769 nil t)
770 (setq title 770 (setq title
771 (buffer-substring 771 (buffer-substring
772 ;; skip over section type 772 ;; skip over section type
773 (progn (forward-word 1) 773 (progn (forward-word 1)