]> code.delx.au - gnu-emacs/blobdiff - lisp/autoinsert.el
* term/mac-win.el (encoding-vector, mac-font-encoder-list)
[gnu-emacs] / lisp / autoinsert.el
index b13fe3ce50307ebc6c4301eb7bb8ca8a82208ed0..ea3df8efa68a0bdf05843fb813991f21580cdecc 100644 (file)
@@ -136,7 +136,7 @@ If this contains a %s, that will be replaced by the matching rule."
     (("\\.[1-9]\\'" . "Man page skeleton")
      "Short description: "
      ".\\\" Copyright (C), " (substring (current-time-string) -4) "  "
-     (getenv "ORGANIZATION") | "Free Software Foundation, Inc."
+     (getenv "ORGANIZATION") | (progn user-full-name)
      "
 .\\\" You may distribute this file under the terms of the GNU Free
 .\\\" Documentation Licence.
@@ -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)
@@ -331,4 +331,5 @@ insert a template for the file depending on the mode of the buffer."
 
 (provide 'autoinsert)
 
+;;; arch-tag: 5b6630ac-c735-43cf-b097-b78c622af909
 ;;; autoinsert.el ends here