diff src/balloon-x.c @ 136:b980b6286996 r20-2b2

Import from CVS: tag r20-2b2
author cvs
date Mon, 13 Aug 2007 09:31:12 +0200
parents 34a5b81f86ba
children 6608ceec7cf8
line wrap: on
line diff
--- a/src/balloon-x.c	Mon Aug 13 09:30:13 2007 +0200
+++ b/src/balloon-x.c	Mon Aug 13 09:31:12 2007 +0200
@@ -1,3 +1,26 @@
+/* 
+   Copyright (c) 1997 Douglas Keller
+
+This file is part of XEmacs.
+
+XEmacs 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.
+
+XEmacs 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 XEmacs; see the file COPYING.  If not, write to
+the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+Boston, MA 02111-1307, USA.  */
+
+/* Synched up with: Not in FSF. */
+
+
 #include <config.h>
 #include "lisp.h"
 
@@ -8,72 +31,77 @@
 
 /* ### start of hack */
 
-static unsigned long alloc_color( Display* dpy, const char* colorname, int light )
+static unsigned long
+alloc_color (Display* dpy, const char* colorname, int light)
 {
-  Colormap cmap = DefaultColormap( dpy, DefaultScreen(dpy) );
+  Colormap cmap = DefaultColormap (dpy, DefaultScreen(dpy));
   unsigned long pixel = 0;
   XColor color;
 
-  if( XParseColor(dpy, cmap, colorname, &color) && XAllocColor(dpy, cmap, &color) )
-  {
-    pixel = color.pixel;
-  }
+  if (XParseColor(dpy, cmap, colorname, &color) && XAllocColor(dpy, cmap, &color))
+    {
+      pixel = color.pixel;
+    }
   else
-  {
-    if( light )
     {
-      printf("Warning: could not allocate color \"%s\", using \"white\"\n", colorname);
-      pixel = alloc_color( dpy, "white", True );
+      if (light)
+	{
+	  printf ("Warning: could not allocate color \"%s\", using \"white\"\n",
+		  colorname);
+	  pixel = alloc_color (dpy, "white", True);
+	}
+      else
+	{
+	  printf ("Warning: could not allocate color \"%s\", using \"black\"\n",
+		  colorname);
+	  pixel = alloc_color (dpy, "black", True);
+	}
     }
-    else
-    {
-      printf("Warning: could not allocate color \"%s\", using \"black\"\n", colorname);
-      pixel = alloc_color( dpy, "black", True );
-    }
-  }
   return pixel;
 }
 
-static XFontStruct* open_font( Display* dpy, const char* font_name )
+static XFontStruct *
+open_font (Display* dpy, const char* font_name)
 {
   XFontStruct* fontStruct = NULL;
 
-  fontStruct = XLoadQueryFont( dpy, font_name ? font_name : "fixed" );
-  if( fontStruct == NULL )
-  {
-    printf("Warning: could not load font \"%s\", using \"fixed\".\n", font_name);
-    fontStruct = XLoadQueryFont( dpy, "fixed" );
-    assert( fontStruct != NULL );
-  }
+  fontStruct = XLoadQueryFont (dpy, font_name ? font_name : "fixed");
+  if (fontStruct == NULL)
+    {
+      printf ("Warning: could not load font \"%s\", using \"fixed\".\n", font_name);
+      fontStruct = XLoadQueryFont (dpy, "fixed");
+      assert (fontStruct != NULL);
+    }
   return fontStruct;
 }
 
-static void init( void )
+static void
+init (void)
 {
   static int init;
 
-  if( !init )
-  {
-    Pixel fg, bg, shine, shadow;
-    XFontStruct* font;
-    Display *dpy = DEVICE_X_DISPLAY (XDEVICE (Vdefault_x_device));
+  if (!init)
+    {
+      Pixel fg, bg, shine, shadow;
+      XFontStruct* font;
+      Display *dpy = DEVICE_X_DISPLAY (XDEVICE (Vdefault_x_device));
+
+      fg = alloc_color (dpy, "grey60", 1);
+      bg = alloc_color (dpy, "black", 0);
 
-    fg = alloc_color( dpy, "grey60",  1 );
-    bg = alloc_color( dpy, "black", 0 );
-    
-    shine  = alloc_color( dpy, "grey80", 1 );
-    shadow = alloc_color( dpy, "grey40", 0 );
+      shine  = alloc_color (dpy, "grey80", 1);
+      shadow = alloc_color (dpy, "grey40", 0);
 
-    font = open_font( dpy, "-adobe-helvetica-medium-r-normal--12-*" );
+      font = open_font (dpy, "-adobe-helvetica-medium-r-normal--12-*");
 
-    balloon_help_create( dpy, bg, fg, shine, shadow, font );
-    init = 1;
-  }
+      balloon_help_create (dpy, bg, fg, shine, shadow, font);
+      init = 1;
+    }
 }
 
 /* ### end of hack */
 
-DEFUN( "show-balloon-help", Fshow_balloon_help, 1, 1, 0, /*
+DEFUN ("show-balloon-help", Fshow_balloon_help, 1, 1, 0, /*
 Show balloon help.
 */
        (string))
@@ -83,33 +111,33 @@
 
   p = (char *) XSTRING_DATA (string);
 
-  init();
+  init ();
 
-  balloon_help_show( p );
+  balloon_help_show (p);
 
   return Qnil;
 }
 
-DEFUN( "hide-balloon-help", Fhide_balloon_help, 0, 0, 0, /*
+DEFUN ("hide-balloon-help", Fhide_balloon_help, 0, 0, 0, /*
 Hide balloon help.
 */
       ())
 {
-  init();
+  init ();
 
-  balloon_help_hide();
+  balloon_help_hide ();
 
   return Qnil;
 }
 
-DEFUN( "balloon-help-move-to-pointer", Fballoon_help_move_to_pointer, 0, 0, 0, /*
+DEFUN ("balloon-help-move-to-pointer", Fballoon_help_move_to_pointer, 0, 0, 0, /*
 Hide balloon help.
 */
       ())
 {
-  init();
+  init ();
 
-  balloon_help_move_to_pointer();
+  balloon_help_move_to_pointer ();
 
   return Qnil;
 }
@@ -123,9 +151,9 @@
 void
 syms_of_balloon_x (void)
 {
-  DEFSUBR( Fshow_balloon_help );
-  DEFSUBR( Fhide_balloon_help );
-  DEFSUBR( Fballoon_help_move_to_pointer );
+  DEFSUBR (Fshow_balloon_help);
+  DEFSUBR (Fhide_balloon_help);
+  DEFSUBR (Fballoon_help_move_to_pointer);
 }
 
 void