Richard M. Stallman [Mon, 17 Oct 1994 07:01:39 +0000 (07:01 +0000)]
(intern_face): Set the fill_style.
(copy_face, merge_faces): Copy the pixmap_h and pixmap_w.
(intern_face): Store the stipple in the GC.
(unload_color): Really do free the color.
(free_frame_faces): Call unload_pixmap.
(Fset_face_attribute_internal): Handle background pixmap.
Destroy old pixmap when necessary.
(free_frame_faces): Destroy pixmaps.
(load_pixmap): New function.
(Fpixmap_spec_p): New function.
(syms_of_xfaces): Set up Lisp function pixmap-spec-p.
Set up Qpixmap_spec_p.
(compute_base_face): Don't set cached_index field.
(compute_base_face): Use FRAME_FOREGROUND_PIXEL,
FRAME_BACKGROUND_PIXEL, FRAME_FONT.
Richard M. Stallman [Mon, 17 Oct 1994 06:56:52 +0000 (06:56 +0000)]
Include paths.h.
Support background stipple, and search path for bitmap files:
(x_set_icon_type): Pass x_bitmap_icon 2nd arg as Lisp_Object.
(x_icon_type): Return a Lisp_Object.
(x_destroy_bitmap, x_reference_bitmap): Take frame as arg. Callers changed.
(struct x_bitmap_record): New fields height, width, depth.
(x_create_bitmap_from_data): Fill in those fields.
(x_bitmap_height, x_bitmap_width, x_bitmap_pixmap): New functions.
(x_create_bitmap_from_file): Arg FILE is now a Lisp_Object.
Search Vbitmap_file_path for it. Fill in new fields.
(syms_of_xfns): Set up Vbitmap_file_path.
Richard M. Stallman [Sat, 15 Oct 1994 22:17:15 +0000 (22:17 +0000)]
(x_set_icon_type): If icon-type is a string, then use
bitmap from that file.
(Fx_create_frame): Set icon_bitmap field to -1.
(struct x_bitmap_record): New structure type.
(x_bitmaps, x_bitmaps_size, x_bitmaps_last, x_bitmaps_free): New variables.
(x_allocate_bitmap_record): New function.
(x_reference_bitmap, x_create_bitmap, x_create_bitmap_from_file)
(x_destroy_bitmap, x_lookup_pixmap): New functions.
Richard M. Stallman [Sat, 15 Oct 1994 22:01:22 +0000 (22:01 +0000)]
(x_bitmap_icon): Allow bitmap to come from file.
(x_wm_set_icon_pixmap): Second arg is now pixmap_id;
call x_lookup_pixmap.
(x_text_icon): Call x_destroy_bitmap.
Karl Heuer [Sat, 15 Oct 1994 04:49:14 +0000 (04:49 +0000)]
(stuffline, scraplines): Functions deleted.
(line_dance, line_dance_len, line_dance_in_progress): New vars.
(XTins_del_lines): Don't do any X calls; just update the array.
(do_line_dance): New function. Do the X calls here.
(XTupdate_end, XTwrite_glyphs): Call do_line_dance.
Richard M. Stallman [Fri, 14 Oct 1994 05:19:13 +0000 (05:19 +0000)]
Eliminate the "display faces"; store GCs in the "computed faces".
(face_vector, nfaces, nfaces_allocated): Vars deleted.
(free_frame_faces): Free GCs in the computed faces.
Free the computed faces themselves.
(clear_face_cache): Renamed from clear_face_vector
and completely rewritten to free GCs in the computed faces.
(get_cached_face): Function deleted.
(build_face): Function deleted; code moved into intern_face.
(intern_face): Don't treat default and modeline faces specially.
(recompute_basic_faces): Call intern_face, not build_face.
(intern_face, clear_face_vector, load_font, unload_font)
(load_color, free_frame_faces, recompute_basic_faces): Use FRAME_X_DISPLAY.
Richard M. Stallman [Thu, 13 Oct 1994 18:20:15 +0000 (18:20 +0000)]
(menu-bar-update-buffers-1): New subroutine
broken out of menu-bar-update-buffers.
Truncate the file name and discard the nondirectory part.
(menu-bar-update-buffers): Discard middle of long buffer names.
Richard M. Stallman [Wed, 12 Oct 1994 23:23:23 +0000 (23:23 +0000)]
(facemenu-read-color, facemenu-colors): New fn, var.
(facemenu-set-face, facemenu-set-face-from-menu,
facemenu-after-change): Face property can take a list value; add
to it rather than completely replacing the property.
(facemenu-add-face, facemenu-discard-redundant-faces): New functions.
(facemenu-set-foreground, facemenu-set-background)
(facemenu-get-face, facemenu-foreground, facemenu-background): New
functions and variables. Faces with names of the form fg:color
and bg:color are now treated specially.
(facemenu-update): Updated for above.
Richard M. Stallman [Wed, 12 Oct 1994 09:27:49 +0000 (09:27 +0000)]
(mouse-major-mode-menu): Use minor-mode-map-alist
instead of overriding-local-map. Display equiv keys using
mouse-major-mode-menu-compute-equiv-keys.
(mouse-major-mode-menu-compute-equiv-keys): New function.
(mouse-major-mode-menu): New function, on C-mouse-3.
(mouse-major-mode-menu-1): New function
(mouse-set-font): Move it to C-mouse-2.
Simon Marshall [Wed, 12 Oct 1994 09:23:37 +0000 (09:23 +0000)]
* font-lock.el: To make font-lock.el dumpable: (font-lock-display-type,
font-lock-background-mode, font-lock-face-attributes): Default to nil.
(font-lock-make-faces): New function. Set them.
(font-lock.el): Add to after-init-hook if noninteractive or use it.
(font-lock-maximum-size): New variable.
(font-lock-mode): Use it to fontify only if buffer is within it.
(font-lock-defaults, font-lock-defaults-alist): Item for syntax table.
(font-lock-set-defaults): Set font-lock-syntax-table too.
(lisp-font-lock-keywords-2): Fix CLisp end-of-keyword in regexp.
(c-font-lock-keywords-*): Specific to ANSI C.
(c++-font-lock-keywords-*): Specific to ANSI C++.
Simon Marshall [Wed, 12 Oct 1994 08:55:27 +0000 (08:55 +0000)]
* makefile.el: (makefile-mode-syntax-table): Made `'' and ``' be
strings, and `#' be a comment.
(makefile-font-lock-keywords): Add variable reference regexp.
(makefile-mode): Set font-lock-defaults.
Simon Marshall [Wed, 12 Oct 1994 08:24:50 +0000 (08:24 +0000)]
* fortran.el: (fortran-mode-syntax-table): Made `!' be a comment.
(fortran-font-lock-keywords-1, fortran-font-lock-keywords-2,
fortran-font-lock-keywords): New variables.
(fortran-mode): Set font-lock-defaults.
Simon Marshall [Wed, 12 Oct 1994 08:00:49 +0000 (08:00 +0000)]
* ada.el: (ada-mode-syntax-table): Made `-' and `\n' be comments.
(ada-font-lock-keywords-1, ada-font-lock-keywords-2,
ada-font-lock-keywords): New variables.
(ada-mode): Set font-lock-defaults.