mv Tkperl/NotUnix.exc  Tkperl/OnlyWin.exc
mv DragDrop/Win32Site/NotUnix.exc  DragDrop/Win32Site/OnlyWin.exc
exit 0

After this 800.014 should build (checked with 5.005_53).  However, font-name
resolution API used by Perl/Tk changed after 800.012, so that OS/2-specific
routines in tkOS2Font.c are not picked up.  Thus the built binary has
very limited functionality.

--- ./pTk/mTk/additions/imgWindow.c~	Sat Apr  3 12:26:44 1999
+++ ./pTk/mTk/additions/imgWindow.c	Fri Apr 16 01:30:06 1999
@@ -15,7 +15,9 @@
 #include "imgInt.h"
 #include "X11/Xutil.h"
 #ifndef	__WIN32__
-#   include "X11/Xproto.h"
+#   ifndef __PM__
+#      include "X11/Xproto.h"
+#   endif
 #else
 #   include <windows.h>
 #   include "X11/Xlib.h"
--- ./Tk/MMutil.pm~	Fri Apr 16 01:33:34 1999
+++ ./Tk/MMutil.pm	Fri Apr 16 01:24:16 1999
@@ -406,6 +406,14 @@ sub find_subdir
       {
        warn "Skip $dir on $win_arch\n"
       }
+     elsif (($win_arch ne 'x') and -f "$dir/OnlyUnix.exc")
+      {
+       warn "Skip $dir on $win_arch\n"
+      }
+     elsif (($win_arch !~ /win/) and -f "$dir/OnlyWin.exc")
+      {
+       warn "Skip $dir on $win_arch\n"
+      }
      else
       {
        $dir{$dir} = 1
--- ./pTk/mTk/unix/tkUnixPort.h~	Thu Mar 25 16:51:56 1999
+++ ./pTk/mTk/unix/tkUnixPort.h	Fri Apr 16 01:28:50 1999
@@ -93,7 +93,9 @@
 #include <X11/cursorfont.h>
 #include <X11/keysym.h>
 #include <X11/Xatom.h>
-#include <X11/Xproto.h>
+#ifndef __PM__
+#  include <X11/Xproto.h>
+#endif
 #include <X11/Xresource.h>
 #include <X11/Xutil.h>
 
--- ./pTk/mTk/tixGeneric/tixMwm.c~	Sat Aug  1 05:22:56 1998
+++ ./pTk/mTk/tixGeneric/tixMwm.c	Fri Apr 16 01:28:42 1999
@@ -17,7 +17,9 @@
 #include "tkVMacro.h"
 #include <X11/Xlib.h>
 #include <X11/Xatom.h>
-#include <X11/Xproto.h>
+#ifndef __PM__
+#  include <X11/Xproto.h>
+#endif
 #include <X11/Xutil.h>
 
 
--- ./pTk/mTk/additions/imgWindow.c~	Sat Apr  3 12:26:44 1999
+++ ./pTk/mTk/additions/imgWindow.c	Fri Apr 16 01:30:06 1999
@@ -15,7 +15,9 @@
 #include "imgInt.h"
 #include "X11/Xutil.h"
 #ifndef	__WIN32__
-#   include "X11/Xproto.h"
+#   ifndef __PM__
+#      include "X11/Xproto.h"
+#   endif
 #else
 #   include <windows.h>
 #   include "X11/Xlib.h"
--- ./Tk/MMutil.pm~	Fri Apr 16 01:33:34 1999
+++ ./Tk/MMutil.pm	Fri Apr 16 01:24:16 1999
@@ -406,6 +406,14 @@ sub find_subdir
       {
        warn "Skip $dir on $win_arch\n"
       }
+     elsif (($win_arch ne 'x') and -f "$dir/OnlyUnix.exc")
+      {
+       warn "Skip $dir on $win_arch\n"
+      }
+     elsif (($win_arch !~ /win/) and -f "$dir/OnlyWin.exc")
+      {
+       warn "Skip $dir on $win_arch\n"
+      }
      else
       {
        $dir{$dir} = 1
--- ./MANIFEST~	Mon Apr  5 14:58:52 1999
+++ ./MANIFEST	Fri Apr 16 01:38:06 1999
@@ -31,7 +31,7 @@ DragDrop/DragDrop/SunSite.pm
 DragDrop/DropSite.pm
 DragDrop/Makefile.PL
 DragDrop/Win32Site/Makefile.PL
-DragDrop/Win32Site/NotUnix.exc
+DragDrop/Win32Site/OnlyWin.exc
 DragDrop/Win32Site/Win32Site.pm
 DragDrop/Win32Site/Win32Site.xs
 DragDrop/drag_test
@@ -217,7 +217,7 @@ Tk/winfolder.xpm
 Tk/wintext.xpm
 TkXSUB.def
 Tkperl/Makefile.PL
-Tkperl/NotUnix.exc
+Tkperl/OnlyWin.exc
 Tkperl/winMain.c
 ToDo
 VERSIONS			Description of version naming scheme