Mercurial > emacs
annotate lisp/patcomp.el @ 95865:99530dd346d3
(LFACE_FOUNDRY): New macro.
(check_lface_attrs): Check foundry.
(set_lface_from_font): Don't parse "FOUNDRY-FAMILY" from.
(merge_face_vectors): Check foundry.
(merge_face_ref): Likewise.
(Finternal_set_lisp_face_attribute): Likewise.
(x_update_menu_appearance): Likewise.
(Finternal_get_lisp_face_attribute): Likewise.
(lface_hash): Likewise.
(lface_same_font_attributes_p): Likewise.
(x_supports_face_attributes_p): Likewise.
(tty_supports_face_attributes_p): Likewise.
(Finternal_set_alternative_font_family_alist): Intern strings.
(Finternal_set_alternative_font_registry_alist): Downcase strings.
(realize_default_face): Set LFACE_FOUNDRY (lface).
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Fri, 13 Jun 2008 02:08:32 +0000 |
parents | 1e3a407766b9 |
children | ef719132ddfa |
rev | line source |
---|---|
47726
33d53d287ee4
Add "no-byte-compile: t" in first line.
Juanma Barranquero <lekktu@gmail.com>
parents:
38414
diff
changeset
|
1 ;;; patcomp.el --- used by patch files to update Emacs releases -*- no-byte-compile: t -*- |
10015 | 2 |
38414
67b464da13ec
Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents:
22388
diff
changeset
|
3 ;; This file is part of GNU Emacs. |
67b464da13ec
Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents:
22388
diff
changeset
|
4 |
67b464da13ec
Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents:
22388
diff
changeset
|
5 ;;; Commentary: |
67b464da13ec
Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents:
22388
diff
changeset
|
6 |
67b464da13ec
Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents:
22388
diff
changeset
|
7 ;;; Code: |
67b464da13ec
Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents:
22388
diff
changeset
|
8 |
10015 | 9 (defun batch-byte-recompile-emacs () |
10 "Recompile the Emacs `lisp' directory. | |
11 This is used after installing the patches for a new version." | |
12 (let ((load-path (list (expand-file-name "lisp")))) | |
13 (byte-recompile-directory "lisp"))) | |
10016
de27224b0b43
(batch-byte-compile-emacs): New function.
Richard M. Stallman <rms@gnu.org>
parents:
10015
diff
changeset
|
14 |
de27224b0b43
(batch-byte-compile-emacs): New function.
Richard M. Stallman <rms@gnu.org>
parents:
10015
diff
changeset
|
15 (defun batch-byte-compile-emacs () |
de27224b0b43
(batch-byte-compile-emacs): New function.
Richard M. Stallman <rms@gnu.org>
parents:
10015
diff
changeset
|
16 "Compile new files installed in the Emacs `lisp' directory. |
de27224b0b43
(batch-byte-compile-emacs): New function.
Richard M. Stallman <rms@gnu.org>
parents:
10015
diff
changeset
|
17 This is used after installing the patches for a new version. |
de27224b0b43
(batch-byte-compile-emacs): New function.
Richard M. Stallman <rms@gnu.org>
parents:
10015
diff
changeset
|
18 It uses the command line arguments to specify the files to compile." |
de27224b0b43
(batch-byte-compile-emacs): New function.
Richard M. Stallman <rms@gnu.org>
parents:
10015
diff
changeset
|
19 (let ((load-path (list (expand-file-name "lisp")))) |
de27224b0b43
(batch-byte-compile-emacs): New function.
Richard M. Stallman <rms@gnu.org>
parents:
10015
diff
changeset
|
20 (batch-byte-compile))) |
38414
67b464da13ec
Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents:
22388
diff
changeset
|
21 |
93975
1e3a407766b9
Fix up comment convention on the arch-tag lines.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
52401
diff
changeset
|
22 ;; arch-tag: cb299b78-1d6c-4c02-945b-12fa2e856d6f |
38414
67b464da13ec
Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents:
22388
diff
changeset
|
23 ;;; patcomp.el ends here |