From: John Paul Wallington Date: Mon, 15 Nov 2004 20:50:08 +0000 (+0000) Subject: (auto-insert-alist): Insert the user's name in copyright notice, X-Git-Tag: ttn-vms-21-2-B4~3914 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=fbee29e6e13605693435420cfc26728a3d074c85;p=emacs.git (auto-insert-alist): Insert the user's name in copyright notice, rather than Free Software Foundation, for the Emacs Lisp header case too. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 66016d5a3b2..ec09e119786 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2004-11-15 John Paul Wallington + + * autoinsert.el (auto-insert-alist): Insert the user's name in + copyright notice, rather than Free Software Foundation, for the + Emacs Lisp header case too. + 2004-11-15 Vinicius Jose Latorre * printing.el (pr-ps-file-print, pr-toggle-duplex): Fix typos. diff --git a/lisp/autoinsert.el b/lisp/autoinsert.el index 88acbd04792..ea3df8efa68 100644 --- a/lisp/autoinsert.el +++ b/lisp/autoinsert.el @@ -167,7 +167,7 @@ If this contains a %s, that will be replaced by the matching rule." ";;; " (file-name-nondirectory (buffer-file-name)) " --- " str " ;; Copyright (C) " (substring (current-time-string) -4) " " - (getenv "ORGANIZATION") | "Free Software Foundation, Inc." " + (getenv "ORGANIZATION") | (progn user-full-name) " ;; Author: " (user-full-name) '(if (search-backward "&" (line-beginning-position) t)