home *** CD-ROM | disk | FTP | other *** search
/ rtfm.mit.edu / 2014.07.rtfm.mit.edu.tar / rtfm.mit.edu / pub / x11_release < prev    next >
Text File  |  1988-04-01  |  35KB  |  1,233 lines
  1. Follow these steps to patch the X11 support in a standard 18.50 GNU
  2. Emacs distribution:
  3.  
  4. 1) Apply the diffs below to change:
  5.  
  6.     lisp/x-mouse.el
  7.     lisp/term/x-win.el
  8.     src/dispnew.c
  9.     src/emacs.c
  10.     src/keyboard.c
  11.     src/process.c
  12.     src/x11fns.c
  13.     src/x11term.c
  14.     src/x11term.h
  15.  
  16. 2) Install the new files:
  17.  
  18.     src/sink_11.h
  19.     src/sinkmask_11.h
  20. ================================= Diffs ==================================
  21. diff -rc2 dist-18.50/lisp/x-mouse.el dist-18.51/lisp/x-mouse.el
  22. *** dist-18.50/lisp/x-mouse.el    Sat Mar  5 13:17:12 1988
  23. --- dist-18.51/lisp/x-mouse.el    Mon Mar 21 17:20:10 1988
  24. ***************
  25. *** 235,246 ****
  26.       (and selection (call-interactively selection))))
  27.   
  28. ! (define-key mouse-map x-button-c-s-middle 'x-help)
  29. ! (define-key mouse-map x-button-c-s-left 'x-buffer-menu)
  30. ! (define-key mouse-map x-button-right 'x-mouse-select)
  31. ! (define-key mouse-map x-button-left 'x-mouse-set-mark)
  32.   (define-key mouse-map x-button-c-s-right 'x-mouse-keep-one-window)
  33.   (define-key mouse-map x-button-c-right 'x-mouse-select-and-split)
  34. - (define-key mouse-map x-button-middle 'x-mouse-set-point)
  35.   (define-key mouse-map x-button-s-middle 'x-cut-text)
  36.   (define-key mouse-map x-button-s-right 'x-paste-text)
  37.   (define-key mouse-map x-button-c-middle 'x-cut-and-wipe-text)
  38. --- 235,282 ----
  39.       (and selection (call-interactively selection))))
  40.   
  41. ! ; Prevent beeps on button-up.  If the button isn't bound to anything, it
  42. ! ; will beep on button-down.
  43. ! (define-key mouse-map x-button-right-up 'x-mouse-ignore)
  44. ! (define-key mouse-map x-button-middle-up 'x-mouse-ignore)
  45. ! (define-key mouse-map x-button-left-up 'x-mouse-ignore)
  46. ! (define-key mouse-map x-button-s-right-up 'x-mouse-ignore)
  47. ! (define-key mouse-map x-button-s-middle-up 'x-mouse-ignore)
  48. ! (define-key mouse-map x-button-s-left-up 'x-mouse-ignore)
  49. ! (define-key mouse-map x-button-m-right-up 'x-mouse-ignore)
  50. ! (define-key mouse-map x-button-m-middle-up 'x-mouse-ignore)
  51. ! (define-key mouse-map x-button-m-left-up 'x-mouse-ignore)
  52. ! (define-key mouse-map x-button-c-right-up 'x-mouse-ignore)
  53. ! (define-key mouse-map x-button-c-middle-up 'x-mouse-ignore)
  54. ! (define-key mouse-map x-button-c-left-up 'x-mouse-ignore)
  55. ! (define-key mouse-map x-button-m-s-right-up 'x-mouse-ignore)
  56. ! (define-key mouse-map x-button-m-s-middle-up 'x-mouse-ignore)
  57. ! (define-key mouse-map x-button-m-s-left-up 'x-mouse-ignore)
  58. ! (define-key mouse-map x-button-c-s-right-up 'x-mouse-ignore)
  59. ! (define-key mouse-map x-button-c-s-middle-up 'x-mouse-ignore)
  60. ! (define-key mouse-map x-button-c-s-left-up 'x-mouse-ignore)
  61. ! (define-key mouse-map x-button-c-m-right-up 'x-mouse-ignore)
  62. ! (define-key mouse-map x-button-c-m-middle-up 'x-mouse-ignore)
  63. ! (define-key mouse-map x-button-c-m-left-up 'x-mouse-ignore)
  64. ! (define-key mouse-map x-button-c-m-s-right-up 'x-mouse-ignore)
  65. ! (define-key mouse-map x-button-c-m-s-middle-up 'x-mouse-ignore)
  66. ! (define-key mouse-map x-button-c-m-s-left-up 'x-mouse-ignore)
  67. ! 
  68.   (define-key mouse-map x-button-c-s-right 'x-mouse-keep-one-window)
  69.   (define-key mouse-map x-button-c-right 'x-mouse-select-and-split)
  70.   (define-key mouse-map x-button-s-middle 'x-cut-text)
  71.   (define-key mouse-map x-button-s-right 'x-paste-text)
  72.   (define-key mouse-map x-button-c-middle 'x-cut-and-wipe-text)
  73. + 
  74. + (if (or (not (boundp 'window-system-version))
  75. +     (eq window-system-version 10))
  76. +     (progn
  77. +       (define-key mouse-map x-button-c-s-middle 'x-help)
  78. +       (define-key mouse-map x-button-c-s-left 'x-buffer-menu)
  79. +       (define-key mouse-map x-button-right 'x-mouse-select)
  80. +       (define-key mouse-map x-button-left 'x-mouse-set-mark)
  81. +       (define-key mouse-map x-button-middle 'x-mouse-set-point))
  82. +   (define-key mouse-map x-button-c-s-middle 'x-mouse-ignore)
  83. +   (define-key mouse-map x-button-c-s-left 'x-mouse-ignore)
  84. +   (define-key mouse-map x-button-right 'x-cut-text)
  85. +   (define-key mouse-map x-button-left 'x-mouse-set-point)
  86. +   (define-key mouse-map x-button-middle 'x-paste-text))
  87. diff -rc2 dist-18.50/lisp/term/x-win.el dist-18.51/lisp/term/x-win.el
  88. *** dist-18.50/lisp/term/x-win.el    Sat Mar  5 13:16:00 1988
  89. --- dist-18.51/lisp/term/x-win.el    Mon Mar 21 17:20:34 1988
  90. ***************
  91. *** 28,45 ****
  92.     (setq x-switches '((\"-r\" . t) (\"-font\" . \"foo\") (\"-b\" . \"8\")))")
  93.   
  94. ! (setq command-switch-alist
  95. !       (append '(("-r" . x-handle-switch)
  96. !         ("-i" . x-handle-switch)
  97. !         ("-font" . x-handle-switch)
  98. !         ("-w" . x-handle-switch)
  99. !         ("-b" . x-handle-switch)
  100. !         ("-ib" . x-handle-switch)
  101. !         ("-fg" . x-handle-switch)
  102. !         ("-bg" . x-handle-switch)
  103. !         ("-bd" . x-handle-switch)
  104. !         ("-cr" . x-handle-switch)
  105. !         ("-ms" . x-handle-switch))
  106. !           command-switch-alist))
  107.   
  108.   ;; This is run after the command args are parsed.
  109.   (defun x-handle-switch (switch)
  110. --- 28,68 ----
  111.     (setq x-switches '((\"-r\" . t) (\"-font\" . \"foo\") (\"-b\" . \"8\")))")
  112.   
  113. ! (if (or (not (boundp 'window-system-version))
  114. !     (eq window-system-version 10))
  115. !     (setq command-switch-alist
  116. !       (append '(("-r" . x-handle-switch)
  117. !             ("-i" . x-handle-switch)
  118. !             ("-font" . x-handle-switch)
  119. !             ("-w" . x-handle-switch)
  120. !             ("-b" . x-handle-switch)
  121. !             ("-ib" . x-handle-switch)
  122. !             ("-fg" . x-handle-switch)
  123. !             ("-bg" . x-handle-switch)
  124. !             ("-bd" . x-handle-switch)
  125. !             ("-cr" . x-handle-switch)
  126. !             ("-ms" . x-handle-switch))
  127. !           command-switch-alist))
  128. !   (setq command-switch-alist
  129. !     (append '(("-r" . ignore)
  130. !           ("-i" . ignore)
  131. !           ("-rn" . xignore)
  132. !           ("-font" . xignore)
  133. !           ("-fn" . xignore)
  134. !           ("-wn" . xignore)
  135. !           ("-in" . xignore)
  136. !           ("-w" . xignore)
  137. !           ("-geometry" . xignore)
  138. !           ("-b" . xignore)
  139. !           ("-ib" . xignore)
  140. !           ("-fg" . xignore)
  141. !           ("-bg" . xignore)
  142. !           ("-bd" . xignore)
  143. !           ("-cr" . xignore)
  144. !           ("-ms" . xignore))
  145. !         command-switch-alist)))
  146.   
  147. + (defun xignore (&rest ignore)
  148. +   (setq command-line-args-left (cdr command-line-args-left)))
  149. + 
  150.   ;; This is run after the command args are parsed.
  151.   (defun x-handle-switch (switch)
  152. ***************
  153. *** 160,173 ****
  154.   ;; only if Emacs has been compiled to support direct interface to X.
  155.   
  156. ! (if (fboundp 'x-change-display)
  157.       (progn
  158. -       ;; xterm.c depends on using interrupt-driven input.
  159. -       (set-input-mode t nil)
  160. - 
  161. -       ;; Not defvar!  This is not DEFINING this variable, just specifying
  162. -       ;; a value for it.
  163. -       (setq window-setup-hook 'x-pop-up-window)
  164. - 
  165.         (require 'x-mouse)
  166.   
  167.         (put 'suspend-emacs 'disabled
  168. --- 183,201 ----
  169.   ;; only if Emacs has been compiled to support direct interface to X.
  170.   
  171. ! (if (eq window-system 'x)
  172.       (progn
  173.         (require 'x-mouse)
  174. +       (if (or (not (boundp 'window-system-version))
  175. +           (eq window-system-version 10))
  176. +       (progn
  177. +         ;; xterm.c depends on using interrupt-driven input.
  178. +         (set-input-mode t nil)
  179. +         
  180. +         ;; Not defvar!  This is not DEFINING this variable, just specifying
  181. +         ;; a value for it.
  182. +         (setq term-setup-hook 'x-pop-up-window)
  183. +         (while x-switches
  184. +           (x-handle-switch-1 (car (car x-switches)) (cdr (car x-switches)))
  185. +           (setq x-switches (cdr x-switches)))))
  186.   
  187.         (put 'suspend-emacs 'disabled
  188. ***************
  189. *** 177,185 ****
  190.         (substitute-key-definition 'suspend-emacs nil global-map)
  191.         (substitute-key-definition 'suspend-emacs nil esc-map)
  192. !       (substitute-key-definition 'suspend-emacs nil ctl-x-map)
  193. !       ;; Not needed any more -- done in C.
  194. !       ;; (if (not x-processed-defaults) (x-get-default-args))
  195. !       ;; Process switch settings made by .emacs file.
  196. !       (while x-switches
  197. !     (x-handle-switch-1 (car (car x-switches)) (cdr (car x-switches)))
  198. !     (setq x-switches (cdr x-switches)))))
  199. --- 205,207 ----
  200.         (substitute-key-definition 'suspend-emacs nil global-map)
  201.         (substitute-key-definition 'suspend-emacs nil esc-map)
  202. !       (substitute-key-definition 'suspend-emacs nil ctl-x-map)))
  203. diff -rc2 dist-18.50/src/dispnew.c dist-18.51/src/dispnew.c
  204. *** dist-18.50/src/dispnew.c    Mon Feb 29 12:46:38 1988
  205. --- dist-18.51/src/dispnew.c    Mon Mar 21 17:21:13 1988
  206. ***************
  207. *** 95,98 ****
  208. --- 95,102 ----
  209.                      ('x is the only current possibility) */
  210.   
  211. + Lisp_Object Vwindow_system_version;    /* Version of the window system;
  212. +                        current values for 'x are
  213. +                        10 and 11 */
  214. + 
  215.   /* Nonzero means reading single-character input with prompt
  216.      so put cursor on minibuffer after the prompt.  */
  217. ***************
  218. *** 1295,1300 ****
  219.   #ifdef HAVE_X_WINDOWS
  220.     extern Lisp_Object Vxterm;
  221.     Vxterm = Qnil;
  222. ! #endif
  223.   
  224.     MetaFlag = 0;
  225. --- 1299,1306 ----
  226.   #ifdef HAVE_X_WINDOWS
  227.     extern Lisp_Object Vxterm;
  228. +   extern Lisp_Object Vwindow_system_version;
  229. + 
  230.     Vxterm = Qnil;
  231. ! #endif /* HAVE_X_WINDOWS */
  232.   
  233.     MetaFlag = 0;
  234. ***************
  235. *** 1303,1306 ****
  236. --- 1309,1313 ----
  237.     terminal_type = (char *) 0;
  238.   
  239. +   Vxterm = Qnil;
  240.     if (!inhibit_window_system)
  241.       {
  242. ***************
  243. *** 1307,1318 ****
  244.   #ifdef HAVE_X_WINDOWS
  245.         extern char *alternate_display;
  246. !       if (alternate_display || egetenv ("DISPLAY"))
  247.       {
  248.         x_term_init ();
  249.         Vxterm = Qt;
  250.   #ifdef X11
  251. !       Vwindow_system = intern ("x11");
  252.   #else
  253. !       Vwindow_system = intern ("x");
  254.   #endif /* X11 */
  255.         goto term_init_done;
  256. --- 1314,1329 ----
  257.   #ifdef HAVE_X_WINDOWS
  258.         extern char *alternate_display;
  259. !       /* Changed to deal with KSH lossage */
  260. !       char *disp = egetenv ("DISPLAY");
  261. ! 
  262. !       if (alternate_display || (disp && *disp))
  263.       {
  264.         x_term_init ();
  265.         Vxterm = Qt;
  266. +       Vwindow_system = intern ("x");
  267.   #ifdef X11
  268. !       XSET (Vwindow_system_version, Lisp_Int, 11);
  269.   #else
  270. !       XSET (Vwindow_system_version, Lisp_Int, 10);
  271.   #endif /* X11 */
  272.         goto term_init_done;
  273. ***************
  274. *** 1376,1379 ****
  275. --- 1387,1394 ----
  276.   \(such as `x') or nil if emacs is running on an ordinary terminal.");
  277.     Vwindow_system = Qnil;
  278. +   DEFVAR_LISP ("window-system-version", &Vwindow_system_version,
  279. +     "A symbol naming the version of the window-system under which emacs\n\
  280. + is running.");
  281. +   Vwindow_system_version = Qnil;
  282.     DEFVAR_BOOL ("cursor-in-echo-area", &cursor_in_echo_area,
  283.       "Non-nil means put cursor in minibuffer after any message displayed there.");
  284. diff -rc2 dist-18.50/src/emacs.c dist-18.51/src/emacs.c
  285. *** dist-18.50/src/emacs.c    Mon Feb 29 12:46:41 1988
  286. --- dist-18.51/src/emacs.c    Mon Feb 29 12:48:28 1988
  287. ***************
  288. *** 73,79 ****
  289.      the display to use.  */
  290.   char *alternate_display;
  291.   char **xargv;
  292.   int xargc;
  293. ! #endif /* HAVE_X_WINDOWS */
  294.   
  295.   /* Nonzero means running Emacs without interactive terminal.  */
  296. --- 73,82 ----
  297.      the display to use.  */
  298.   char *alternate_display;
  299. + #endif /* HAVE_X_WINDOWS */
  300. + 
  301. + #ifdef X11
  302.   char **xargv;
  303.   int xargc;
  304. ! #endif /* X11 */
  305.   
  306.   /* Nonzero means running Emacs without interactive terminal.  */
  307. ***************
  308. *** 224,231 ****
  309.     inhibit_window_system = 0;
  310.   
  311. ! #ifdef HAVE_X_WINDOWS
  312.     xargv = argv;
  313.     xargc = argc;
  314. ! #endif
  315.   
  316.   /* Handle the -t switch, which specifies filename to use as terminal */
  317. --- 227,234 ----
  318.     inhibit_window_system = 0;
  319.   
  320. ! #ifdef X11
  321.     xargv = argv;
  322.     xargc = argc;
  323. ! #endif /* X11 */
  324.   
  325.   /* Handle the -t switch, which specifies filename to use as terminal */
  326. diff -rc2 dist-18.50/src/keyboard.c dist-18.51/src/keyboard.c
  327. *** dist-18.50/src/keyboard.c    Mon Feb 29 12:46:46 1988
  328. --- dist-18.51/src/keyboard.c    Sat Mar  5 12:57:55 1988
  329. ***************
  330. *** 960,963 ****
  331. --- 960,965 ----
  332.        int *addr;
  333.   {
  334. +   unsigned char buf[64 * BUFFER_SIZE_FACTOR];
  335. +   int i;
  336.   #ifdef VMS
  337.     /* On VMS, we always have something in the buffer
  338. ***************
  339. *** 970,973 ****
  340. --- 972,987 ----
  341.     else if (ioctl (0, FIONREAD, addr) < 0)
  342.       *addr = 0;
  343. +   else if (*addr > 0 && read_socket_hook) {
  344. +     *addr = (*read_socket_hook) (0, buf, sizeof buf);
  345. +     for (i = 0; i < *addr; i++)
  346. +       {
  347. +     kbd_buffer_store_char (buf[i]);
  348. +     /* Don't look at input that follows a C-g too closely.
  349. +        This reduces lossage due to autorepeat on C-g.  */
  350. +     if (buf[i] == Ctl('G'))
  351. +       break;
  352. +       }
  353. +     *addr = kbd_count;
  354. +   }
  355.   #else /* no FIONREAD */
  356.     read_avail_input ();
  357. diff -rc2 dist-18.50/src/process.c dist-18.51/src/process.c
  358. *** dist-18.50/src/process.c    Mon Feb 29 12:46:53 1988
  359. --- dist-18.51/src/process.c    Mon Mar 21 17:23:35 1988
  360. ***************
  361. *** 1233,1237 ****
  362.     int wait_channel = 0;
  363.     struct Lisp_Process *wait_proc = 0;
  364. !   extern kbd_count;
  365.   
  366.     /* Detect when read_kbd is really the address of a Lisp_Process.  */
  367. --- 1233,1237 ----
  368.     int wait_channel = 0;
  369.     struct Lisp_Process *wait_proc = 0;
  370. !   extern kbd_count, interrupt_input;
  371.   
  372.     /* Detect when read_kbd is really the address of a Lisp_Process.  */
  373. ***************
  374. *** 1380,1385 ****
  375.        to give it higher priority than subprocesses */
  376.   
  377. !       if (read_kbd && (kbd_count || !NULL (Vquit_flag)))
  378. !     break;
  379.   
  380.         if (read_kbd && (Available & ChannelMask (0)))
  381. --- 1380,1390 ----
  382.        to give it higher priority than subprocesses */
  383.   
  384. !       if (read_kbd)
  385. !     {      
  386. !           if (interrupt_input && (kbd_count || !NULL (Vquit_flag)))
  387. !             break;
  388. !           if (!interrupt_input && detect_input_pending())
  389. !         break;
  390. !         } 
  391.   
  392.         if (read_kbd && (Available & ChannelMask (0)))
  393. diff -rc2 dist-18.50/src/x11fns.c dist-18.51/src/x11fns.c
  394. *** dist-18.50/src/x11fns.c    Mon Feb 29 12:46:57 1988
  395. --- dist-18.51/src/x11fns.c    Sat Mar  5 12:57:16 1988
  396. ***************
  397. *** 103,106 ****
  398. --- 103,108 ----
  399.   extern int XXpid;
  400.   
  401. + extern char *XXidentity;
  402. + 
  403.   extern Display *XXdisplay;
  404.   extern int bitblt, CursorExists, VisibleX, VisibleY;
  405. ***************
  406. *** 423,427 ****
  407.       default_name = (char *) XSTRING (arg)->data;
  408.   
  409. !     value = XGetDefault (progname, default_name);
  410.       if (value)
  411.           return build_string (value);
  412. --- 425,433 ----
  413.       default_name = (char *) XSTRING (arg)->data;
  414.   
  415. !     if (XXidentity)
  416. !         value = XGetDefault (XXdisplay, XXidentity, default_name);
  417. !     else
  418. !         value = XGetDefault (XXdisplay, CLASS, default_name);
  419. !     
  420.       if (value)
  421.           return build_string (value);
  422. ***************
  423. *** 657,664 ****
  424.       sigsetmask (mask);
  425.   
  426. - #if 0
  427. -     if (QLength(XXdisplay) > 0)
  428. - #endif        read_events_block ();
  429. - 
  430.       return Qt;
  431.   }
  432. --- 663,666 ----
  433. ***************
  434. *** 684,692 ****
  435.       XSetWindowSize(screen_height,screen_width);
  436.       sigsetmask (mask);
  437. - 
  438. - #if 0
  439. -     if (QLength(XXdisplay) > 0)
  440. -         read_events_block ();
  441. - #endif
  442.   
  443.       return Qt;
  444. --- 686,689 ----
  445. diff -rc2 dist-18.50/src/x11term.c dist-18.51/src/x11term.c
  446. *** dist-18.50/src/x11term.c    Mon Feb 29 12:47:04 1988
  447. --- dist-18.51/src/x11term.c    Sat Mar  5 12:57:16 1988
  448. ***************
  449. *** 23,42 ****
  450.   /* Thanks to Mark Biggers for all of the Window Manager support */
  451.   
  452. - /* PLEASE NOTE!
  453. -  *
  454. -  * This is only a test copy of the X11 code -- it is NOT suitable
  455. -  * for distribution beyond test sites!!!!
  456. -  *
  457. -  */
  458. - 
  459.   /*
  460. !  *    $Source: /mit/emacs/src/RCS/xterm_11.c,v $
  461.    *    $Author: rfrench $
  462.    *    $Locker:  $
  463. !  *    $Header: xterm_11.c,v 1.9 88/01/16 15:33:35 rfrench Exp $
  464.    */
  465.   
  466.   #ifndef lint
  467. ! static char *rcsid_xterm_c = "$Header: xterm_11.c,v 1.9 88/01/16 15:33:35 rfrench Exp $";
  468.   #endif    lint
  469.   
  470. --- 23,35 ----
  471.   /* Thanks to Mark Biggers for all of the Window Manager support */
  472.   
  473.   /*
  474. !  *    $Source: /mit/emacs/src/RCS/x11term.c,v $
  475.    *    $Author: rfrench $
  476.    *    $Locker:  $
  477. !  *    $Header: x11term.c,v 1.12 88/02/29 14:11:07 rfrench Exp $
  478.    */
  479.   
  480.   #ifndef lint
  481. ! static char *rcsid_xterm_c = "$Header: x11term.c,v 1.12 88/02/29 14:11:07 rfrench Exp $";
  482.   #endif    lint
  483.   
  484. ***************
  485. *** 54,59 ****
  486.    * if this is not done before the other system files.  */
  487.   
  488. - /*#include "xdebug.h"*/
  489. - 
  490.   #include "x11term.h"
  491.   
  492. --- 47,50 ----
  493. ***************
  494. *** 80,85 ****
  495.   #include "termchar.h"
  496.   
  497. ! #include "sink.h"
  498. ! #include "sinkmask.h"
  499.   
  500.   #define min(a,b) ((a)<(b) ? (a) : (b))
  501. --- 71,76 ----
  502.   #include "termchar.h"
  503.   
  504. ! #include "sink_11.h"
  505. ! #include "sinkmask_11.h"
  506.   
  507.   #define min(a,b) ((a)<(b) ? (a) : (b))
  508. ***************
  509. *** 96,101 ****
  510.   #define MAXHEIGHT 300    /* In lines */
  511.   
  512. - #define CLASS  "emacs"    /* class id for GNU Emacs, used in .Xdefaults, etc. */
  513. - 
  514.   int pixelwidth,pixelheight;
  515.   char *progname;
  516. --- 87,90 ----
  517. ***************
  518. *** 125,130 ****
  519.   int WindowMapped;
  520.   
  521. ! static char  *XXidentity;    /* Resource name of this invocation of Emacs */
  522.   static char  *XXicon_name;    /* user-supplied icon info */
  523.   static char  *XXheader;        /* user-supplied window header info */
  524.   
  525. --- 114,120 ----
  526.   int WindowMapped;
  527.   
  528. ! char  *XXidentity;        /* Resource name of this invocation of Emacs */
  529.   static char  *XXicon_name;    /* user-supplied icon info */
  530. + static int   XXicon_usebitmap;    /* Use bitmap or not */
  531.   static char  *XXheader;        /* user-supplied window header info */
  532.   
  533. ***************
  534. *** 139,142 ****
  535. --- 129,135 ----
  536.   
  537.   int CursorExists;        /* during updates cursor is turned off */
  538. + int CursorOutline;             /* when the pointer is not in the Emacs
  539. +                                  * widow the cursor should be drawn in
  540. +                                  * outline form a la xterm */
  541.   static int InUpdate;        /* many of functions here may be invoked
  542.                    * even if no update in progress; when
  543. ***************
  544. *** 176,183 ****
  545.   char *rindex();
  546.   
  547. - #ifdef BIGDEBUG
  548. - char debug_string[500000];
  549. - #endif BIGDEBUG
  550. - 
  551.   /* HLmode -- Changes the GX function for output strings.  Could be used to
  552.    * change font.  Check an XText library function call. 
  553. --- 169,172 ----
  554. ***************
  555. *** 230,233 ****
  556. --- 219,223 ----
  557.       if (!initialized) {
  558.           CursorExists = 0;
  559. +         CursorOutline = 1;
  560.           VisibleX = 0;
  561.           VisibleY = 0;
  562. ***************
  563. *** 234,244 ****
  564.       }
  565.       XTclear_screen ();
  566. - #if 0
  567. - #ifdef FIONREAD
  568. -     ioctl (0, FIONREAD, &stuffpending);
  569. -     if (stuffpending)
  570. -         read_events_block ();
  571. - #endif
  572. - #endif /* 0 */
  573.   }
  574.   
  575. --- 224,227 ----
  576. ***************
  577. *** 505,522 ****
  578.   }
  579.   
  580. - /* The following routine is for the deaf or for the pervert who prefers 
  581. -  * that his terminal flashes at him rather than beep at him.
  582. -  */
  583. - 
  584. - static int flashedback;
  585. - 
  586.   XTflash ()
  587.   {
  588.       XGCValues gcv_temp;
  589. !     struct itimerval itimer;
  590.       int mask = sigblock (sigmask (SIGIO));
  591.   
  592. -     extern int flashback ();
  593. - 
  594.   #ifdef XDEBUG
  595.       fprintf (stderr, "XTflash\n");
  596. --- 488,497 ----
  597.   }
  598.   
  599.   XTflash ()
  600.   {
  601.       XGCValues gcv_temp;
  602. !     struct timeval to;
  603.       int mask = sigblock (sigmask (SIGIO));
  604.   
  605.   #ifdef XDEBUG
  606.       fprintf (stderr, "XTflash\n");
  607. ***************
  608. *** 528,540 ****
  609.             AllPlanes);
  610.       
  611. -     signal (SIGALRM, flashback);
  612. -     getitimer (ITIMER_REAL, &itimer);
  613. -     itimer.it_value.tv_usec += 250000;
  614. -     itimer.it_interval.tv_sec = 0;
  615. -     itimer.it_interval.tv_usec = 0;
  616. -     flashedback = 0;
  617. - 
  618. -     setitimer (ITIMER_REAL, &itimer, 0);
  619. - 
  620.       XFillRectangle (XXdisplay, XXwindow, XXgc_temp, 0, 0,
  621.               screen_width*XXfontw+2*XXInternalBorder,
  622. --- 503,506 ----
  623. ***************
  624. *** 544,565 ****
  625.       sigsetmask (mask);
  626.   
  627. !     while (!flashedback)
  628. !         pause ();
  629. ! 
  630. !     XFreeGC(XXdisplay, XXgc_temp);
  631. ! }
  632. ! 
  633. ! flashback ()
  634. ! {
  635. !     int mask = sigblock (sigmask (SIGIO) | sigmask (SIGALRM));
  636. ! 
  637.       XFillRectangle (XXdisplay, XXwindow, XXgc_temp, 0, 0,
  638.               screen_width*XXfontw+2*XXInternalBorder,
  639.                  screen_height*XXfonth+2*XXInternalBorder);
  640.       XFlush (XXdisplay);
  641. - 
  642. -     flashedback = 1;
  643.       sigsetmask (mask);
  644. ! }    
  645.   
  646.   XTfeep ()
  647. --- 510,526 ----
  648.       sigsetmask (mask);
  649.   
  650. !     to.tv_sec = 0;
  651. !     to.tv_usec = 250000;
  652. !     
  653. !     select(0, 0, 0, 0, &to);
  654. !     
  655. !     mask = sigblock (sigmask (SIGIO));
  656.       XFillRectangle (XXdisplay, XXwindow, XXgc_temp, 0, 0,
  657.               screen_width*XXfontw+2*XXInternalBorder,
  658.                  screen_height*XXfonth+2*XXInternalBorder);
  659. +     XFreeGC(XXdisplay, XXgc_temp);
  660.       XFlush (XXdisplay);
  661.       sigsetmask (mask);
  662. ! }
  663.   
  664.   XTfeep ()
  665. ***************
  666. *** 587,590 ****
  667. --- 548,552 ----
  668.       if (!WindowMapped) {
  669.           CursorExists = 0;
  670. +         CursorOutline = 1;
  671.           return 0;
  672.           /* Currently the return values are not */
  673. ***************
  674. *** 611,615 ****
  675.                       &ActiveScreen[VisibleY+1]->body[VisibleX],
  676.                       1);
  677. !         else
  678.               XDrawImageString(XXdisplay, XXwindow, XXgc_curs,
  679.                       VisibleX*XXfontw+XXInternalBorder,
  680. --- 573,587 ----
  681.                       &ActiveScreen[VisibleY+1]->body[VisibleX],
  682.                       1);
  683. !         else if (CursorOutline) {
  684. !             XDrawImageString(XXdisplay, XXwindow, XXgc_norm,
  685. !                     VisibleX*XXfontw+XXInternalBorder,
  686. !                     VisibleY*XXfonth+XXInternalBorder+XXbase,
  687. !                     &ActiveScreen[VisibleY+1]->body[VisibleX],
  688. !                     1);
  689. !             XDrawRectangle (XXdisplay, XXwindow, XXgc_norm,
  690. !                     VisibleX*XXfontw+XXInternalBorder,
  691. !                     VisibleY*XXfonth+XXInternalBorder,
  692. !                     XXfontw - 1, XXfonth - 1);
  693. !         } else
  694.               XDrawImageString(XXdisplay, XXwindow, XXgc_curs,
  695.                       VisibleX*XXfontw+XXInternalBorder,
  696. ***************
  697. *** 623,626 ****
  698. --- 595,603 ----
  699.                       VisibleY*XXfonth+XXInternalBorder,
  700.                       XXfontw, XXfonth, 0);
  701. +         else if (CursorOutline)
  702. +             XDrawRectangle (XXdisplay, XXwindow, XXgc_norm,
  703. +                     VisibleX*XXfontw+XXInternalBorder,
  704. +                     VisibleY*XXfonth+XXInternalBorder,
  705. +                     XXfontw - 1, XXfonth - 1);
  706.           else
  707.               XFillRectangle (XXdisplay, XXwindow, XXgc_norm,
  708. ***************
  709. *** 650,653 ****
  710. --- 627,631 ----
  711.       if (!WindowMapped) {
  712.           CursorExists = 0;
  713. +         CursorOutline = 1;
  714.           sigsetmask (mask);
  715.           return;
  716. ***************
  717. *** 946,950 ****
  718.   #endif
  719.   
  720. !     return (internal_socket_read (bufp, numchars, 0));
  721.   }
  722.   
  723. --- 924,928 ----
  724.   #endif
  725.   
  726. !     return (internal_socket_read (bufp, numchars));
  727.   }
  728.   
  729. ***************
  730. *** 1105,1149 ****
  731.   #endif sun
  732.   
  733. ! #if 0
  734. ! /* All input is supposed to go through
  735. !    the usual mechanisms in keyboard.c, which do the actual I/O
  736. !    by calling XTread_socket via read_socket_hook.  A side-path such
  737. !    as this is not clean.
  738. ! 
  739. !    Since keyboard input is normally done in a signal handler, any
  740. !    attempt to do it elsewhere is not only unmodular but risks a timing
  741. !    error as well.  It is also superfluous, unless there is a bug in
  742. !    the usual mechanisms or the use of read_socket_hook.  If so, fix it
  743. !    there; don't create a redundant mechanism here.  -- RMS.  */
  744. ! 
  745. ! read_events_block ()
  746. ! {
  747. !     unsigned char buf[64];
  748. !     int i, nread;
  749. ! 
  750. ! #ifdef XDEBUG
  751. !     fprintf(stderr,"read_events_block\n");
  752. ! #endif
  753. !     
  754. !     nread = internal_socket_read (buf, sizeof buf, 0);
  755. !     if (!nread)
  756. !         return (0);
  757. !     
  758. !     for (i=0; i < nread; i++) {
  759. !         kbd_buffer_store_char (buf[i]);
  760. !         /* Don't look at input that follows a C-g too closely.
  761. !          * This reduces lossage due to autorepeat on C-g.  */
  762. !         if (buf[i] == ('G' & 037))
  763. !             break;
  764. !     }
  765. !     return (nread);
  766. ! }
  767. ! 
  768. ! #endif /* 0 */
  769. !     
  770. ! internal_socket_read(bufp, numchars, stopatkey)
  771.       register unsigned char *bufp;
  772.       register int numchars;
  773. -     int stopatkey;
  774.   {
  775.       int count,nbytes,rows,cols;
  776. --- 1083,1089 ----
  777.   #endif sun
  778.   
  779. ! internal_socket_read(bufp, numchars)
  780.       register unsigned char *bufp;
  781.       register int numchars;
  782.   {
  783.       int count,nbytes,rows,cols;
  784. ***************
  785. *** 1154,1189 ****
  786.       KeySym keysym;
  787.       
  788. -     extern int input_pending;
  789. - 
  790.       count = 0;
  791.   
  792. - #ifdef BIGDEBUG
  793. -     my_log("Entering internal_socket_read input_pending = %d\n",input_pending);
  794. - #endif BIGDEBUG
  795. -     
  796.       while (XPending (XXdisplay)) {
  797. -         if (stopatkey) {
  798. -             XPeekEvent(XXdisplay,&event);
  799. -             if ((event.type & 0177) == KeyPress) {
  800. -                 if (XLookupString (&event,
  801. -                            mapping_buf, 20, &keysym,
  802. -                            &status) ||
  803. -                     keysym == XK_Left ||
  804. -                     keysym == XK_Right ||
  805. -                     keysym == XK_Up ||
  806. -                     keysym == XK_Down)
  807. -                     return (1);
  808. -             }
  809. -             if (((event.type & 0177) == ButtonPress) ||
  810. -                 ((event.type & 0177) == ButtonRelease))
  811. -                 return (1);
  812. -         }
  813.           XNextEvent (XXdisplay,&event);
  814.           event.type &= 0177;       /* Mask out XSendEvent indication */
  815.   
  816. - #ifdef BIGDEBUG
  817. -         my_log("Got event %d\n",event.type);
  818. - #endif BIGDEBUG
  819. - 
  820.           switch (event.type) {
  821.   
  822. --- 1094,1103 ----
  823. ***************
  824. *** 1191,1194 ****
  825. --- 1105,1112 ----
  826.               break;
  827.   
  828. +         case MappingNotify:
  829. +             XRefreshKeyboardMapping(&event);
  830. +             break;
  831. +             
  832.           case MapNotify:
  833.               WindowMapped = 1;
  834. ***************
  835. *** 1242,1245 ****
  836. --- 1160,1181 ----
  837.               break;
  838.               
  839. +         /*
  840. +          * NOTE: No 'Focus' management is being done yet. If
  841. +          * some other window has grabbed the focus, emacs will
  842. +          * still show a filled cursor whenever the pointer
  843. +          * enters the emacs window.
  844. +          */ 
  845. +         case EnterNotify:
  846. +             CursorToggle ();
  847. +                         CursorOutline = 0;
  848. +             CursorToggle ();
  849. +                         break;
  850. + 
  851. +         case LeaveNotify:
  852. +             CursorToggle ();
  853. +                         CursorOutline = 1;
  854. +             CursorToggle ();
  855. +                         break;
  856. + 
  857.           case KeyPress:
  858.               nbytes = XLookupString (&event,
  859. ***************
  860. *** 1246,1249 ****
  861. --- 1182,1190 ----
  862.                           mapping_buf, 20, &keysym,
  863.                           &status);
  864. +             /*
  865. +              * Someday this will be unnecessary as we will
  866. +              * be able to use XRebindKeysym so XLookupString
  867. +              * will have already given us the string we want.
  868. +              */
  869.               if (IsFunctionKey(keysym) ||
  870.                   IsMiscFunctionKey(keysym)) {
  871. ***************
  872. *** 1388,1393 ****
  873.       desiredwindow = option;
  874.   
  875. !     if (option = XGetDefault(XXdisplay, class, "BodyFont"))
  876. !     temp_font = option;
  877.   }
  878.   
  879. --- 1329,1341 ----
  880.       desiredwindow = option;
  881.   
  882. !     /*
  883. !      * At X11 the .BodyFont was renamed to .Font, (see the resource
  884. !      * manager documentation), but allow backward compatibility.
  885. !      * First look for .Font and if that fails look at .BodyFont.
  886. !      */
  887. !     if (option = XGetDefault(XXdisplay, class, "Font"))
  888. !       temp_font = option;
  889. !     else if (option = XGetDefault(XXdisplay, class, "BodyFont"))
  890. !       temp_font = option;
  891.   }
  892.   
  893. ***************
  894. *** 1398,1401 ****
  895. --- 1346,1350 ----
  896.       register int xxargc;
  897.       register char **xxargv;
  898. +     char *ptr;
  899.       extern char *getenv ();
  900.       extern XTinterrupt_signal ();
  901. ***************
  902. *** 1481,1486 ****
  903. --- 1430,1439 ----
  904.       XXheader = (char *) NULL;
  905.   
  906. +     XXicon_usebitmap = 0;
  907. +     
  908.       temp_font = "fixed";
  909.       progname = xargv[0];
  910. +     if (ptr = rindex(progname, '/'))
  911. +         progname = ptr+1;
  912.       XXpid = getpid ();
  913.       default_window = "=80x24+0+0";
  914. ***************
  915. *** 1568,1571 ****
  916. --- 1521,1529 ----
  917.               xxargv++;
  918.           }
  919. +         if (xxargc && !strcmp (*xxargv, "-i")) {
  920. +             xxargc--;
  921. +             xxargv++;
  922. +             XXicon_usebitmap = 1;
  923. +         } 
  924.           if ((xxargc > 1) && !strcmp (*xxargv, "-b")) {
  925.               xxargc--;
  926. ***************
  927. *** 1582,1586 ****
  928.               xxargv++;
  929.           }
  930. !         if ((xxargc > 1) && !strcmp (*xxargv, "-w")) {
  931.               xxargc--;
  932.               xxargv++;
  933. --- 1540,1545 ----
  934.               xxargv++;
  935.           }
  936. !         if ((xxargc > 1) && (!strcmp (*xxargv, "-w") ||
  937. !                      !strcmp (*xxargv, "-geometry"))) {
  938.               xxargc--;
  939.               xxargv++;
  940. ***************
  941. *** 1773,1783 ****
  942.       request_sigio();
  943.   
  944. - #ifdef BIGDEBUG
  945. -     *debug_string = '\0';
  946. -     if (1) {
  947. -         int dump_log();
  948. -         signal(SIGUSR1,dump_log);
  949. -     } 
  950. - #endif BIGDEBUG    
  951.   }
  952.   
  953. --- 1732,1735 ----
  954. ***************
  955. *** 1859,1866 ****
  956.       {
  957.           sigsetmask (mask);
  958. - #if 0
  959. -         if (QLength (XXdisplay) > 0)
  960. -         read_events_block ();
  961. - #endif
  962.           return  -1;
  963.       }
  964. --- 1811,1814 ----
  965. ***************
  966. *** 1878,1885 ****
  967.   
  968.       sigsetmask (mask);
  969. ! #if 0
  970. !     if (QLength (XXdisplay) > 0)
  971. !         read_events_block ();
  972. ! #endif    
  973.       return 0;
  974.   }
  975. --- 1826,1830 ----
  976.   
  977.       sigsetmask (mask);
  978. !     
  979.       return 0;
  980.   }
  981. ***************
  982. *** 2139,2146 ****
  983.       XWMHints  wmhints;
  984.   
  985. - 
  986. -     wmhints.flags = InputHint | StateHint |
  987. -         IconPixmapHint | IconMaskHint;
  988.       
  989.       wmhints.input = True;
  990.       wmhints.initial_state = NormalState;
  991. --- 2084,2092 ----
  992.       XWMHints  wmhints;
  993.   
  994.       
  995. +     wmhints.flags = InputHint | StateHint;
  996. +     if (XXicon_usebitmap)
  997. +         wmhints.flags |= IconPixmapHint | IconMaskHint;
  998. +     
  999.       wmhints.input = True;
  1000.       wmhints.initial_state = NormalState;
  1001. ***************
  1002. *** 2149,2153 ****
  1003.                       sink_bits, sink_width,
  1004.                       sink_height);
  1005. - 
  1006.       SinkMaskPixmap = XCreateBitmapFromData (XXdisplay, w,
  1007.                           sink_mask_bits,
  1008. --- 2095,2098 ----
  1009. ***************
  1010. *** 2154,2159 ****
  1011.                           sink_mask_width,
  1012.                           sink_mask_height);
  1013. !     wmhints.icon_pixmap = SinkPixmap;
  1014. !     wmhints.icon_mask = SinkMaskPixmap;
  1015.   
  1016.       XSetWMHints(XXdisplay, w, &wmhints);
  1017. --- 2099,2110 ----
  1018.                           sink_mask_width,
  1019.                           sink_mask_height);
  1020. !     if (XXicon_usebitmap) {
  1021. !         wmhints.icon_pixmap = SinkPixmap;
  1022. !         wmhints.icon_mask = SinkMaskPixmap;
  1023. !     }
  1024. !     else {
  1025. !         wmhints.icon_pixmap = 0;
  1026. !         wmhints.icon_mask = 0;
  1027. !     } 
  1028.   
  1029.       XSetWMHints(XXdisplay, w, &wmhints);
  1030. ***************
  1031. *** 2186,2189 ****
  1032. --- 2137,2143 ----
  1033.       == (XFontStruct *) NULL)
  1034.       {
  1035. +     fprintf (stderr, "X server unable to find requested font '%s'!.\n",
  1036. +          (XXcurrentfont == NULL) ? "(null)" :  XXcurrentfont);
  1037. +     fflush (stderr);
  1038.       exit (-98);
  1039.       }
  1040. ***************
  1041. *** 2204,2208 ****
  1042.       else
  1043.       {
  1044. !     desktop = RootWindow(XXdisplay, 0);
  1045.       }
  1046.   
  1047. --- 2158,2162 ----
  1048.       else
  1049.       {
  1050. !     desktop = RootWindow(XXdisplay, DefaultScreen(XXdisplay));
  1051.       }
  1052.   
  1053. ***************
  1054. *** 2240,2243 ****
  1055. --- 2194,2198 ----
  1056.       
  1057.       CursorExists = 0;
  1058. +     CursorOutline = 1;
  1059.       VisibleX = 0;
  1060.       VisibleY = 0;
  1061. ***************
  1062. *** 2255,2258 ****
  1063. --- 2210,2214 ----
  1064.       XSelectInput(XXdisplay, XXwindow, KeyPressMask | 
  1065.            ExposureMask | ButtonPressMask | ButtonReleaseMask |
  1066. +          EnterWindowMask | LeaveWindowMask |
  1067.            StructureNotifyMask);
  1068.   
  1069. ***************
  1070. *** 2261,2286 ****
  1071.   }
  1072.   
  1073. - #ifdef BIGDEBUG
  1074. - 
  1075. - my_log(s,a,b,c,d,e,f,g,h)
  1076. -     char *s;
  1077. - {
  1078. -     char bfr[256];
  1079. -     
  1080. -     sprintf(bfr,s,a,b,c,d,e,f,g,h);
  1081. - 
  1082. -     strcat(debug_string,bfr);
  1083. - }
  1084. - 
  1085. - dump_log()
  1086. - {
  1087. -     fputs(debug_string,stderr);
  1088. -     fflush(stderr);
  1089. -     *debug_string = '\0';
  1090. - }
  1091. - 
  1092. - #endif BIGDEBUG
  1093. -     
  1094.   #endif /* HAVE_X_WINDOWS */
  1095. - 
  1096. - /*#include "xundebug.h"*/
  1097. --- 2217,2219 ----
  1098. diff -rc2 dist-18.50/src/x11term.h dist-18.51/src/x11term.h
  1099. *** dist-18.50/src/x11term.h    Mon Feb 29 12:51:43 1988
  1100. --- dist-18.51/src/x11term.h    Sat Mar  5 12:57:16 1988
  1101. ***************
  1102. *** 1,8 ****
  1103. ! #include <X/Xlib.h>
  1104. ! #include <X/Xatom.h>
  1105. ! #include <X/keysym.h>
  1106. ! #include <X/cursorfont.h>
  1107. ! #include <X/Xutil.h>
  1108. ! #include <X/X10.h>
  1109.   
  1110.   #ifndef X11
  1111. --- 1,8 ----
  1112. ! #include <X11/Xlib.h>
  1113. ! #include <X11/Xatom.h>
  1114. ! #include <X11/keysym.h>
  1115. ! #include <X11/cursorfont.h>
  1116. ! #include <X11/Xutil.h>
  1117. ! #include <X11/X10.h>
  1118.   
  1119.   #ifndef X11
  1120. ***************
  1121. *** 15,16 ****
  1122. --- 15,18 ----
  1123.   #define sigmask(no) (1L << ((no) - 1))
  1124.   #endif
  1125. + 
  1126. + #define CLASS  "emacs"    /* class id for GNU Emacs, used in .Xdefaults, etc. */
  1127. ==================================================== New file src/sink_11.h
  1128. /* $Header: sink_11.h,v 1.1 88/02/06 16:55:50 rfrench Exp $ */
  1129. #define sink_width 48
  1130. #define sink_height 48
  1131. static char sink_bits[] = {
  1132.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 
  1133.    0xff, 0xff, 0xff, 0xff, 0x80, 0x9f, 
  1134.    0xff, 0xff, 0xff, 0xff, 0x9f, 0x9f, 
  1135.    0xff, 0xff, 0xff, 0xff, 0x00, 0x80, 
  1136.    0xff, 0xff, 0xff, 0x7f, 0xfe, 0xbf, 
  1137.    0xff, 0xff, 0xff, 0x7f, 0x03, 0xa0, 
  1138.    0xff, 0xff, 0xff, 0x7f, 0xfd, 0xaf, 
  1139.    0xff, 0xff, 0xff, 0x3f, 0xf9, 0xaf, 
  1140.    0xff, 0xff, 0xff, 0xff, 0xff, 0xaf, 
  1141.    0xff, 0xff, 0xff, 0xff, 0xfc, 0xaf, 
  1142.    0xff, 0xff, 0xff, 0x7f, 0xf8, 0xaf, 
  1143.    0xff, 0xff, 0xff, 0xff, 0xfc, 0xaf, 
  1144.    0xff, 0xff, 0xff, 0xff, 0xff, 0xaf, 
  1145.    0xff, 0xff, 0xff, 0xbf, 0xf7, 0xaf, 
  1146.    0xff, 0xff, 0xff, 0x3f, 0xf3, 0xaf, 
  1147.    0xff, 0xff, 0xff, 0xff, 0xfc, 0xaf, 
  1148.    0x3f, 0x00, 0x00, 0x00, 0x00, 0x20, 
  1149.    0x7f, 0x00, 0x00, 0x00, 0x00, 0xe0, 
  1150.    0xdf, 0xf8, 0xff, 0xff, 0xff, 0x07, 
  1151.    0xcf, 0xf9, 0x0f, 0xff, 0xff, 0xe7, 
  1152.    0xcf, 0xf9, 0xf7, 0xff, 0xff, 0xe7, 
  1153.    0xff, 0xf9, 0xf7, 0x63, 0xfb, 0xe7, 
  1154.    0xff, 0xf9, 0x37, 0x5a, 0xfb, 0xe7, 
  1155.    0xcf, 0xf9, 0xf7, 0x5a, 0xfb, 0xe7, 
  1156.    0xcf, 0xf9, 0xf7, 0x5a, 0xf9, 0xe7, 
  1157.    0xef, 0xf9, 0x0f, 0xdb, 0xfa, 0xe7, 
  1158.    0xff, 0xf9, 0xff, 0xff, 0xff, 0xe7, 
  1159.    0xdf, 0xf9, 0xff, 0xff, 0xff, 0xe7, 
  1160.    0xcf, 0x19, 0xfc, 0xff, 0xff, 0xe7, 
  1161.    0xcf, 0xd9, 0xff, 0xff, 0xff, 0xe7, 
  1162.    0xff, 0xd9, 0x47, 0xce, 0x73, 0xe6, 
  1163.    0xff, 0x19, 0xb6, 0xb5, 0xad, 0xe7, 
  1164.    0xcf, 0xd9, 0xb7, 0xb5, 0x7d, 0xe6, 
  1165.    0xc7, 0xd9, 0xb7, 0xb5, 0xed, 0xe5, 
  1166.    0xef, 0x19, 0xb4, 0x4d, 0x73, 0xe6, 
  1167.    0xff, 0xf1, 0xff, 0xff, 0xff, 0xe3, 
  1168.    0xff, 0x03, 0x80, 0x03, 0x00, 0xf0, 
  1169.    0xef, 0x07, 0x00, 0x01, 0x00, 0xf8, 
  1170.    0xc7, 0xff, 0x3f, 0xf9, 0xff, 0xff, 
  1171.    0xe7, 0xff, 0x7f, 0xfd, 0xe0, 0xff, 
  1172.    0xff, 0xff, 0x7f, 0x7d, 0xdf, 0xff, 
  1173.    0xff, 0xff, 0x7f, 0xbd, 0xb1, 0xff, 
  1174.    0xff, 0xff, 0x7f, 0xbb, 0xae, 0xff, 
  1175.    0xef, 0xff, 0xff, 0xda, 0xae, 0xff, 
  1176.    0xc7, 0xff, 0xff, 0x66, 0xaf, 0xff, 
  1177.    0xe7, 0xff, 0xff, 0xbd, 0xaf, 0xff, 
  1178.    0xff, 0xff, 0xff, 0xc3, 0xaf, 0xff, 
  1179.    0xff, 0xff, 0xff, 0xff, 0xaf, 0xff};
  1180. ==================================================== New file src/sinkmask_11.h
  1181. /* $Header: sinkmask_11.h,v 1.1 88/02/06 16:55:53 rfrench Exp $ */
  1182. #define sink_mask_width 48
  1183. #define sink_mask_height 48
  1184. static char sink_mask_bits[] = {
  1185.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1186.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1187.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1188.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1189.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1190.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1191.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1192.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1193.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1194.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1195.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1196.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1197.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1198.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1199.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1200.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1201.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1202.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1203.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1204.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1205.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1206.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1207.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1208.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1209.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1210.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1211.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1212.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1213.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1214.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1215.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1216.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1217.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1218.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1219.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1220.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1221.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1222.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1223.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1224.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1225.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1226.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1227.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1228.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1229.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1230.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1231.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
  1232.    0xff, 0xff, 0xff, 0xff, 0xff, 0xff}; 
  1233.