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

[Lute Kamstra]

Index: emacs/lisp/emacs-lisp/authors.el
diff -c emacs/lisp/emacs-lisp/authors.el:1.21 
emacs/lisp/emacs-lisp/authors.el:1.22
*** emacs/lisp/emacs-lisp/authors.el:1.21       Fri Apr  8 11:54:57 2005
--- emacs/lisp/emacs-lisp/authors.el    Tue May 17 15:04:07 2005
***************
*** 1,6 ****
  ;;; authors.el --- utility for maintaining Emacs' AUTHORS file -*-coding: 
iso-2022-7bit;-*-
  
! ;; Copyright (C) 2000, 2003 Free Software Foundation, Inc.
  
  ;; Author: Gerd Moellmann <address@hidden>
  ;; Maintainer: Kim F. Storm <address@hidden>
--- 1,6 ----
  ;;; authors.el --- utility for maintaining Emacs' AUTHORS file -*-coding: 
iso-2022-7bit;-*-
  
! ;; Copyright (C) 2000, 2003, 2005 Free Software Foundation, Inc.
  
  ;; Author: Gerd Moellmann <address@hidden>
  ;; Maintainer: Kim F. Storm <address@hidden>
***************
*** 597,604 ****
      (unless (file-exists-p (expand-file-name "src/emacs.c" root))
        (error "Not the root directory of Emacs: %s" root))
      (dolist (log logs)
!       (when (and (string-match "ChangeLog\\(.[0-9]+\\)?$" log)
!                (not (string-match "/lispref/" log)))
        (message "Scanning %s..." log)
        (authors-scan-change-log log table)))
      (let ((els (authors-process-lines "find" root "-name" "*.el")))
--- 597,603 ----
      (unless (file-exists-p (expand-file-name "src/emacs.c" root))
        (error "Not the root directory of Emacs: %s" root))
      (dolist (log logs)
!       (when (string-match "ChangeLog\\(.[0-9]+\\)?$" log)
        (message "Scanning %s..." log)
        (authors-scan-change-log log table)))
      (let ((els (authors-process-lines "find" root "-name" "*.el")))