annotate lisp/=bytecpat.el @ 13767:862fff660446
(Fset_time_zone_rule): Move static var environbuf
to top level.
(syms_of_editfns): Initialize environbuf explicitly.
(Vbuffer_access_fontified_property): New variable.
(syms_of_editfns): Set up Lisp var.
(make_buffer_string): Don't call the Vbuffer_access_fontify_functions
if the text is already fontified.
(Fbuffer_string): Pas 1 for PROPS arg.
(update_buffer_properties): New subroutine.
(Finsert_buffer_substring): Use update_buffer_properties.
(make_buffer_string): New arg PROPS.
(Fbuffer_string, Fbuffer_substring): Pass new arg.
(Fbuffer_substring_no_properties): New function.
(syms_of_editfns): defsubr it.
(Vbuffer_access_fontify_functions): New variable.
(Qbuffer_access_fontify_functions): New variable.
(syms_of_editfns): Set up Lisp variable, initialize them.
(make_buffer_string): Run this new hook.
| author |
Karl Heuer <kwzh@gnu.org> |
| date |
Thu, 21 Dec 1995 16:58:55 +0000 |
| parents |
84acc3adcd63 |
| children |
|
| rev |
line source |
|
13337
|
1 ;;; bytecpat.el --- do recompilation for Emacs patch files.
|
|
13335
|
2 ;;; This function is used by the patch files to update Emacs releases.
|
|
|
3
|
|
|
4 (defun batch-byte-recompile-emacs ()
|
|
|
5 "Recompile the Emacs `lisp' directory.
|
|
|
6 This is used after installing the patches for a new version."
|
|
|
7 (let ((load-path (list (expand-file-name "lisp"))))
|
|
|
8 (byte-recompile-directory "lisp")))
|
|
|
9
|
|
|
10 (defun batch-byte-compile-emacs ()
|
|
|
11 "Compile new files installed in the Emacs `lisp' directory.
|
|
|
12 This is used after installing the patches for a new version.
|
|
|
13 It uses the command line arguments to specify the files to compile."
|
|
|
14 (let ((load-path (list (expand-file-name "lisp"))))
|
|
|
15 (batch-byte-compile)))
|
