Mercurial > emacs
view src/widget.h @ 110914:ccdc694ce7bd
More cleanups and minor fixes for Customize.
* cus-edit.el (custom-face-edit-fix-value): Use
custom-fix-face-spec.
* custom.el (custom-push-theme): Cleanup (use cond).
(disable-theme): Recompute the saved-face property.
(custom-theme-recalc-face): Follow face alias before setting prop.
* custom.el (custom-fix-face-spec): New function; code moved from
custom-face-edit-fix-value.
(custom-push-theme): Use it when checking if a face has been
changed outside customize.
(custom-available-themes): New function.
(load-theme): Use it.
* image.el (image-checkbox-checked, image-checkbox-unchecked): New
variables, containing checkbox images.
* startup.el (fancy-startup-tail):
* wid-edit.el (checkbox): Use them.
author | Chong Yidong <cyd@stupidchicken.com> |
---|---|
date | Mon, 11 Oct 2010 00:49:59 -0400 |
parents | e16f43875a48 |
children | 417b1e4d63cd |
line wrap: on
line source
/* The emacs frame widget public header file. Copyright (C) 1993, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc. 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 3 of the License, 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. If not, see <http://www.gnu.org/licenses/>. */ /* Emacs 19 face widget ported by Fred Pierresteguy */ #ifndef _EmacsFrame_h #define _EmacsFrame_h #define XtNminibuffer "minibuffer" #define XtCMinibuffer "Minibuffer" #define XtNunsplittable "unsplittable" #define XtCUnsplittable "Unsplittable" #define XtNinternalBorderWidth "internalBorderWidth" #define XtCInternalBorderWidth "InternalBorderWidth" #define XtNinterline "interline" #define XtCInterline "Interline" #ifndef XtNfont #define XtNfont "font" #endif #ifndef XtCFont #define XtCFont "Font" #endif #ifndef XtNforeground #define XtNforeground "foreground" #endif #ifndef XtCForeground #define XtCForeground "Foreground" #endif #define XtNcursorColor "cursorColor" #define XtCCursorColor "CursorColor" #define XtNbarCursor "barCursor" #define XtCBarCursor "BarCursor" #define XtNvisualBell "visualBell" #define XtCVisualBell "VisualBell" #define XtCBellVolume "BellVolume" #define XtNbellVolume "bellVolume" #define XtNpointerBackground "pointerBackground" #define XtNpointerColor "pointerColor" #define XtNtextPointer "textPointer" #define XtNspacePointer "spacePointer" #define XtNmodeLinePointer "modePointer" #define XtNgcPointer "gcPointer" #define XtNemacsFrame "emacsFrame" #define XtCEmacsFrame "EmacsFrame" #ifndef XtNgeometry #define XtNgeometry "geometry" #endif #ifndef XtCGeometry #define XtCGeometry "Geometry" #endif #ifndef XtNshowGrip #define XtNshowGrip "showGrip" #endif #ifndef XtNallowResize #define XtNallowResize "allowResize" #endif #ifndef XtNresizeToPreferred #define XtNresizeToPreferred "resizeToPreferred" #endif #define XtNinitialGeometry "initialGeometry" #define XtCInitialGeometry "InitialGeometry" /* structures */ typedef struct _EmacsFrameRec *EmacsFrame; typedef struct _EmacsFrameClassRec *EmacsFrameClass; extern WidgetClass emacsFrameClass; extern struct _DisplayContext* display_context; /* Special entrypoints */ void EmacsFrameSetCharSize (Widget, int, int); void widget_store_internal_border (Widget widget); #endif /* _EmacsFrame_h */ /* arch-tag: 98be17cc-8878-4701-abfa-66f1c04e9cb7 (do not change this comment) */