Mercurial > hg > xemacs-beta
annotate lisp/gdk.el @ 5518:3cc7470ea71c
gnuclient: if TMPDIR was set and connect failed, try again with /tmp
2011-06-03 Aidan Kehoe <kehoea@parhasard.net>
* gnuslib.c (connect_to_unix_server):
Retry with /tmp as a directory in which to search for Unix sockets
if an attempt to connect with some other directory failed (which
may be because gnuclient and gnuserv don't share an environment
value for TMPDIR, or because gnuserv was compiled with USE_TMPDIR
turned off).
| author | Aidan Kehoe <kehoea@parhasard.net> |
|---|---|
| date | Fri, 03 Jun 2011 18:40:57 +0100 |
| parents | 308d34e9f07d |
| children |
| rev | line source |
|---|---|
| 462 | 1 ;;; gdk.el --- Import GDK functions into XEmacs |
| 2 | |
| 3 ;; Copyright (C) 2000 Free Software Foundation | |
| 4 | |
| 5 ;; Maintainer: William Perry <wmperry@gnu.org> | |
| 6 ;; Keywords: extensions, dumped | |
| 7 | |
| 8 ;; This file is part of XEmacs. | |
| 9 | |
|
5402
308d34e9f07d
Changed bulk of GPLv2 or later files identified by script
Mats Lidell <matsl@xemacs.org>
parents:
502
diff
changeset
|
10 ;; XEmacs is free software: you can redistribute it and/or modify it |
|
308d34e9f07d
Changed bulk of GPLv2 or later files identified by script
Mats Lidell <matsl@xemacs.org>
parents:
502
diff
changeset
|
11 ;; under the terms of the GNU General Public License as published by the |
|
308d34e9f07d
Changed bulk of GPLv2 or later files identified by script
Mats Lidell <matsl@xemacs.org>
parents:
502
diff
changeset
|
12 ;; Free Software Foundation, either version 3 of the License, or (at your |
|
308d34e9f07d
Changed bulk of GPLv2 or later files identified by script
Mats Lidell <matsl@xemacs.org>
parents:
502
diff
changeset
|
13 ;; option) any later version. |
| 462 | 14 |
|
5402
308d34e9f07d
Changed bulk of GPLv2 or later files identified by script
Mats Lidell <matsl@xemacs.org>
parents:
502
diff
changeset
|
15 ;; XEmacs is distributed in the hope that it will be useful, but WITHOUT |
|
308d34e9f07d
Changed bulk of GPLv2 or later files identified by script
Mats Lidell <matsl@xemacs.org>
parents:
502
diff
changeset
|
16 ;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
|
308d34e9f07d
Changed bulk of GPLv2 or later files identified by script
Mats Lidell <matsl@xemacs.org>
parents:
502
diff
changeset
|
17 ;; FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
|
308d34e9f07d
Changed bulk of GPLv2 or later files identified by script
Mats Lidell <matsl@xemacs.org>
parents:
502
diff
changeset
|
18 ;; for more details. |
| 462 | 19 |
| 20 ;; You should have received a copy of the GNU General Public License | |
|
5402
308d34e9f07d
Changed bulk of GPLv2 or later files identified by script
Mats Lidell <matsl@xemacs.org>
parents:
502
diff
changeset
|
21 ;; along with XEmacs. If not, see <http://www.gnu.org/licenses/>. |
| 462 | 22 |
| 23 ;;; Synched up with: Not in FSF | |
| 24 | |
| 25 ;;; Commentary: | |
| 26 | |
| 27 ;; This file is dumped with XEmacs. | |
| 28 | |
| 29 (eval-and-compile | |
| 30 (require 'gtk-ffi)) | |
| 31 | |
| 502 | 32 (globally-declare-fboundp |
| 33 '(gtk-import-function-internal gtk-call-function)) | |
| 34 | |
| 462 | 35 (gtk-import-function nil gdk_set_show_events (gboolean . show_events)) |
| 36 (gtk-import-function nil gdk_set_use_xshm (gboolean . use_xshm)) | |
| 37 (gtk-import-function GtkString gdk_get_display) | |
| 38 (gtk-import-function nil gdk_flush) | |
| 39 (gtk-import-function nil gdk_beep) | |
| 40 | |
| 41 (gtk-import-function nil gdk_key_repeat_disable) | |
| 42 (gtk-import-function nil gdk_key_repeat_restore) | |
| 43 | |
| 44 (gtk-import-function gint gdk_visual_get_best_depth) | |
| 45 (gtk-import-function GdkVisualType gdk_visual_get_best_type) | |
| 46 (gtk-import-function GdkVisual gdk_visual_get_system) | |
| 47 (gtk-import-function GdkVisual gdk_visual_get_best) | |
| 48 (gtk-import-function GdkVisual gdk_visual_get_best_with_depth (gint . depth)) | |
| 49 (gtk-import-function GdkVisual gdk_visual_get_best_with_type (GdkVisualType . visual_type)) | |
| 50 (gtk-import-function GdkVisual gdk_visual_get_best_with_both | |
| 51 (gint . depth) | |
| 52 (GdkVisualType . visual_type)) | |
| 53 | |
| 54 (gtk-import-function gboolean gdk_window_is_visible (GdkWindow . window)) | |
| 55 (gtk-import-function gboolean gdk_window_is_viewable (GdkWindow . window)) | |
| 56 | |
| 57 (gtk-import-function gboolean gdk_window_set_static_gravities | |
| 58 (GdkWindow . window) | |
| 59 (gboolean . use_static)) | |
| 60 | |
| 61 (gtk-import-function nil gdk_window_set_cursor | |
| 62 (GdkWindow . window) | |
| 63 (GdkCursor . cursor)) | |
| 64 | |
| 65 (gtk-import-function GdkVisual gdk_window_get_visual (GdkWindow . window)) | |
| 66 (gtk-import-function GdkWindowType gdk_window_get_type (GdkWindow . window)) | |
| 67 (gtk-import-function GdkWindow gdk_window_get_parent (GdkWindow . window)) | |
| 68 (gtk-import-function GdkWindow gdk_window_get_toplevel (GdkWindow . window)) | |
| 69 (gtk-import-function GdkEventMask gdk_window_get_events (GdkWindow . window)) | |
| 70 (gtk-import-function none gdk_window_set_events (GdkWindow . window) (GdkEventMask . events)) | |
| 71 (gtk-import-function none gdk_window_set_icon | |
| 72 (GdkWindow . window) | |
| 73 (GdkWindow . icon_window) | |
| 74 (GdkPixmap . pixmap) | |
| 75 (GdkBitmap . mask)) | |
| 76 (gtk-import-function none gdk_window_set_icon_name (GdkWindow . window) (GtkString . name)) | |
| 77 (gtk-import-function none gdk_window_set_group (GdkWindow . window) (GdkWindow . leader)) | |
| 78 (gtk-import-function none gdk_window_set_decorations | |
| 79 (GdkWindow . window) | |
| 80 (GdkWMDecoration . decorations)) | |
| 81 (gtk-import-function none gdk_window_set_functions | |
| 82 (GdkWindow . window) | |
| 83 (GdkWMFunction . functions)) | |
| 84 | |
| 85 ;; Cursors are handled by glyphs in XEmacs | |
| 86 ;; GCs are handled by faces in XEmacs | |
| 87 ;; Pixmaps are handled by glyphs in XEmacs | |
| 88 ;; Images are handled by glyphs in XEmacs | |
| 89 ;; Colors are handled natively by XEmacs | |
| 90 ;; Fonts are handled natively by XEmacs | |
| 91 | |
| 92 (gtk-import-function none gdk_draw_point | |
| 93 (GdkDrawable . drawable) | |
| 94 (GdkGC . gc) | |
| 95 (gint . x) | |
| 96 (gint . y)) | |
| 97 (gtk-import-function none gdk_draw_line | |
| 98 (GdkDrawable . drawable) | |
| 99 (GdkGC . gc) | |
| 100 (gint . x1) | |
| 101 (gint . y1) | |
| 102 (gint . x2) | |
| 103 (gint . y2)) | |
| 104 (gtk-import-function none gdk_draw_rectangle | |
| 105 (GdkDrawable . drawable) | |
| 106 (GdkGC . gc) | |
| 107 (gboolean . filled) | |
| 108 (gint . x) | |
| 109 (gint . y) | |
| 110 (gint . width) | |
| 111 (gint . height)) | |
| 112 (gtk-import-function none gdk_draw_arc | |
| 113 (GdkDrawable . drawable) | |
| 114 (GdkGC . gc) | |
| 115 (gboolean . filled) | |
| 116 (gint . x) | |
| 117 (gint . y) | |
| 118 (gint . width) | |
| 119 (gint . height) | |
| 120 (gint . angle1) | |
| 121 (gint . angle2)) | |
| 122 (gtk-import-function none gdk_draw_string | |
| 123 (GdkDrawable . drawable) | |
| 124 (GdkFont . font) | |
| 125 (GdkGC . gc) | |
| 126 (gint . x) | |
| 127 (gint . y) | |
| 128 (GtkString . string)) | |
| 129 (gtk-import-function none gdk_draw_text | |
| 130 (GdkDrawable . drawable) | |
| 131 (GdkFont . font) | |
| 132 (GdkGC . gc) | |
| 133 (gint . x) | |
| 134 (gint . y) | |
| 135 (GtkString . string) | |
| 136 (gint . text_length)) | |
| 137 (gtk-import-function none gdk_draw_pixmap | |
| 138 (GdkDrawable . drawable) | |
| 139 (GdkGC . gc) | |
| 140 (GdkImage . image) | |
| 141 (gint . xsrc) | |
| 142 (gint . ysrc) | |
| 143 (gint . xdest) | |
| 144 (gint . ydest) | |
| 145 (gint . width) | |
| 146 (gint . height)) | |
| 147 | |
| 148 ;; Selections are handled natively by XEmacs | |
| 149 | |
| 150 (provide 'gdk) |