Mercurial > emacs
view lisp/rsz-mini.el @ 27982:86de01dd01eb
Change many FRAME_X... macros to FRAME_WINDOW... or other
non-platform-specific equivalents.
[WINDOWSNT]: include w32term.h, fontset.h and define X specific
functions and macros as their w32 equivalents where
non-platform-specifics are not available.
[HAVE_X_WINDOWS]: Change most of these to HAVE_WINDOW_SYSTEM.
(x_create_gc, x_free_gc) [WINDOWSNT]: Add W32 versions.
(clear_font_table) [WINDOWSNT]: Call w32_unload_font.
(frame_update_line_height): Use macros to access f->output_data.
(defined_color): Remove FIXME comments; fixed.
(x_face_list_fonts, prepare_face_for_display): Put X specifics into
#ifdef blocks. Add WINDOWSNT blocks.
(Fx_list_fonts): Use macros for accessing font data.
(set_lface_from_font_name): Different default fonts for X and WINDOWSNT.
(font_scalable_p) [WINDOWSNT]: Treat wildcard XLFD_AVGWIDTH as
scalable for backward compatibility.
(realize_tty_face) [MSDOS]: do the same for WINDOWSNT.
(syms_of_xfaces) [WINDOWSNT]: Allow scalable fonts by default.
author | Jason Rumney <jasonr@gnu.org> |
---|---|
date | Sat, 04 Mar 2000 14:53:34 +0000 |
parents | f541d471520a |
children | dd613770eb0f |
line wrap: on
line source
;;; rsz-mini.el --- dynamically resize minibuffer to display entire contents ;; Copyright (C) 1990, 1993-1995, 1997 Free Software Foundation, Inc. ;; Author: Noah Friedman <friedman@splode.com> ;; Roland McGrath <roland@gnu.org> ;; Maintainer: Noah Friedman <friedman@splode.com> ;; Keywords: minibuffer, window, frame, display ;; $Id: rsz-mini.el,v 1.2 1999/09/13 13:00:24 gerd Exp $ ;; This file is part of GNU Emacs. ;; GNU Emacs is free software; you can redistribute it and/or modify ;; it under the terms of the GNU General Public License as published by ;; the Free Software Foundation; either version 2, or (at your option) ;; any later version. ;; GNU Emacs is distributed in the hope that it will be useful, ;; but WITHOUT ANY WARRANTY; without even the implied warranty of ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ;; GNU General Public License for more details. ;; You should have received a copy of the GNU General Public License ;; along with GNU Emacs; see the file COPYING. If not, write to the ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, ;; Boston, MA 02111-1307, USA. ;;; Commentary: ;; This package is obsolete. Emacs now resizes mini-windows ;; automatically. ;;; Code: (defgroup resize-minibuffer nil "This customization group is obsolete." :group 'frames) ;;;###autoload (defcustom resize-minibuffer-mode nil "*This variable is obsolete." :type 'boolean :group 'resize-minibuffer :require 'rsz-mini) ;;;###autoload (defcustom resize-minibuffer-window-max-height nil "*This variable is obsolete." :type '(choice (const nil) integer) :group 'resize-minibuffer) ;;;###autoload (defcustom resize-minibuffer-window-exactly t "*This variable is obsolete." :type 'boolean :group 'resize-minibuffer) ;;;###autoload (defcustom resize-minibuffer-frame nil "*This variable is obsolete." :type 'boolean :group 'resize-minibuffer) ;;;###autoload (defcustom resize-minibuffer-frame-max-height nil "*This variable is obsolete.") ;;;###autoload (defcustom resize-minibuffer-frame-exactly t "*This variable is obsolete." :type 'boolean :group 'resize-minibuffer) ;;;###autoload (defun resize-minibuffer-mode (&optional prefix) "This function is obsolete." (interactive "P")) (provide 'rsz-mini) ;; rsz-mini.el ends here