[Emacs-diffs] Changes to emacs/lisp/add-log.el

[Lute Kamstra]

Index: emacs/lisp/add-log.el
diff -c emacs/lisp/add-log.el:1.157 emacs/lisp/add-log.el:1.158
*** emacs/lisp/add-log.el:1.157 Sun Apr  3 23:03:21 2005
--- emacs/lisp/add-log.el       Mon Apr  4 08:47:07 2005
***************
*** 1,7 ****
  ;;; add-log.el --- change log maintenance commands for Emacs
  
! ;; Copyright (C) 1985, 86, 88, 93, 94, 97, 98, 2000, 03, 2004
! ;;           Free Software Foundation, Inc.
  
  ;; Maintainer: FSF
  ;; Keywords: tools
--- 1,7 ----
  ;;; add-log.el --- change log maintenance commands for Emacs
  
! ;; Copyright (C) 1985, 1986, 1988, 1993, 1994, 1997, 1998, 2000, 2003,
! ;;   2004, 2005 Free Software Foundation, Inc.
  
  ;; Maintainer: FSF
  ;; Keywords: tools
***************
*** 230,244 ****
       ;; Possibly further names in a list:
       ("\\=, \\([^ ,:([\n]+\\)" nil nil (1 'change-log-file-face))
       ;; Possibly a parenthesized list of names:
!      ("\\= (\\([^() ,\n]+\\|(\\(setf\\|SETF\\) [^() ,\n]+)\\)"
        nil nil (1 'change-log-list-face))
!      ("\\=, *\\([^() ,\n]+\\|(\\(setf\\|SETF\\) [^() ,\n]+)\\)"
        nil nil (1 'change-log-list-face)))
      ;;
      ;; Function or variable names.
!     ("^\t(\\([^() ,\n]+\\|(\\(setf\\|SETF\\) [^() ,\n]+)\\)"
       (1 'change-log-list-face)
!      ("\\=, *\\([^() ,\n]+\\|(\\(setf\\|SETF\\) [^() ,\n]+)\\)" nil nil
        (1 'change-log-list-face)))
      ;;
      ;; Conditionals.
--- 230,244 ----
       ;; Possibly further names in a list:
       ("\\=, \\([^ ,:([\n]+\\)" nil nil (1 'change-log-file-face))
       ;; Possibly a parenthesized list of names:
!      ("\\= (\\([^(),\n]+\\|(\\(setf\\|SETF\\) [^() ,\n]+)\\)"
        nil nil (1 'change-log-list-face))
!      ("\\=, *\\([^(),\n]+\\|(\\(setf\\|SETF\\) [^() ,\n]+)\\)"
        nil nil (1 'change-log-list-face)))
      ;;
      ;; Function or variable names.
!     ("^\t(\\([^(),\n]+\\|(\\(setf\\|SETF\\) [^() ,\n]+)\\)"
       (1 'change-log-list-face)
!      ("\\=, *\\([^(),\n]+\\|(\\(setf\\|SETF\\) [^() ,\n]+)\\)" nil nil
        (1 'change-log-list-face)))
      ;;
      ;; Conditionals.