diff options
| author | Reiner Steib <Reiner.Steib@gmx.de> | 2009-01-03 19:40:20 +0000 |
|---|---|---|
| committer | Reiner Steib <Reiner.Steib@gmx.de> | 2009-01-03 19:40:20 +0000 |
| commit | 4182531ceac8f5635c6d128bcaadb0218ff01ca7 (patch) | |
| tree | f296769571e9276e4f2afd20c88c2ab300889fe0 /lisp/emacs-lisp/copyright.el | |
| parent | 296590671b5a0f9c4c499b6d5a58c7bc245925f8 (diff) | |
| download | emacs-4182531ceac8f5635c6d128bcaadb0218ff01ca7.tar.gz emacs-4182531ceac8f5635c6d128bcaadb0218ff01ca7.tar.bz2 emacs-4182531ceac8f5635c6d128bcaadb0218ff01ca7.zip | |
(copyright-update-directory): Autoload.
Clarify MATCH argument. Print filenames.
Diffstat (limited to 'lisp/emacs-lisp/copyright.el')
| -rw-r--r-- | lisp/emacs-lisp/copyright.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/copyright.el b/lisp/emacs-lisp/copyright.el index f8894a7975d..85cd2b4248a 100644 --- a/lisp/emacs-lisp/copyright.el +++ b/lisp/emacs-lisp/copyright.el @@ -1,7 +1,7 @@ ;;; copyright.el --- update the copyright notice in current buffer ;; Copyright (C) 1991, 1992, 1993, 1994, 1995, 1998, 2001, 2002, 2003, -;; 2004, 2005, 2006, 2007, 2008 Free Software Foundation, Inc. +;; 2004, 2005, 2006, 2007, 2008, 2009 Free Software Foundation, Inc. ;; Author: Daniel Pfeiffer <occitan@esperanto.org> ;; Keywords: maint, tools @@ -282,10 +282,12 @@ Uses heuristic: year >= 50 means 19xx, < 50 means 20xx." (message "Copyright extends beyond `copyright-limit' and won't be updated automatically.")) comment-end \n) +;;;###autoload (defun copyright-update-directory (directory match) "Update copyright notice for all files in DIRECTORY matching MATCH." - (interactive "DDirectory: \nMFilenames matching: ") + (interactive "DDirectory: \nMFilenames matching (regexp): ") (dolist (file (directory-files directory t match nil)) + (message "Updating file `%s'" file) (find-file file) (let ((copyright-query nil)) (copyright-update)) |