comparison admin/unidata/unidata-gen.el @ 106815:1d1d5d9bd884

Add 2010 to copyright years.
author Glenn Morris <rgm@gnu.org>
date Wed, 13 Jan 2010 00:35:10 -0800
parents 5626ccae11ed
children 4d54e23aa31e
comparison
equal deleted inserted replaced
106814:84369111c005 106815:1d1d5d9bd884
1 ;; unidata-gen.el -- Create files containing character property data. 1 ;; unidata-gen.el -- Create files containing character property data.
2 ;; Copyright (C) 2005, 2006, 2007, 2008, 2009 2 ;; Copyright (C) 2005, 2006, 2007, 2008, 2009, 2010
3 ;; National Institute of Advanced Industrial Science and Technology (AIST) 3 ;; National Institute of Advanced Industrial Science and Technology (AIST)
4 ;; Registration Number H13PRO009 4 ;; Registration Number H13PRO009
5 5
6 ;; This file is part of GNU Emacs. 6 ;; This file is part of GNU Emacs.
7 7
1239 (when describer 1239 (when describer
1240 (unless (subrp (symbol-function describer)) 1240 (unless (subrp (symbol-function describer))
1241 (byte-compile describer) 1241 (byte-compile describer)
1242 (setq describer (symbol-function describer))) 1242 (setq describer (symbol-function describer)))
1243 (set-char-table-extra-slot table 3 describer)) 1243 (set-char-table-extra-slot table 3 describer))
1244 (insert ";; Copyright (C) 1991-2009 Unicode, Inc. 1244 (insert ";; Copyright (C) 1991-2009, 2010 Unicode, Inc.
1245 ;; This file was generated from the Unicode data file at 1245 ;; This file was generated from the Unicode data file at
1246 ;; http://www.unicode.org/Public/UNIDATA/UnicodeData.txt. 1246 ;; http://www.unicode.org/Public/UNIDATA/UnicodeData.txt.
1247 ;; See lisp/international/README for the copyright and permission notice.\n" 1247 ;; See lisp/international/README for the copyright and permission notice.\n"
1248 (format "(define-char-code-property '%S %S %S)\n" 1248 (format "(define-char-code-property '%S %S %S)\n"
1249 prop table docstring) 1249 prop table docstring)