*** src/bltGrMarker.c~      Wed Jun 25 18:31:52 1997
--- src/bltGrMarker.c       Thu Dec  4 15:16:38 1997
***************
*** 1764,1770 ****
      if ((imPtr->imageToken == NULL) || (Blt_ImageDeleted(imPtr->imageToken))) {
        return;
      }
!     photoToken = Tk_FindPhoto(imPtr->imageName);
      if (photoToken == NULL) {
        return;                 /* image doesn't exist or isn't a photo image */
      }
--- 1764,1770 ----
      if ((imPtr->imageToken == NULL) || (Blt_ImageDeleted(imPtr->imageToken))) {
        return;
      }
!     photoToken = Tk_FindPhoto(imPtr->graphPtr->interp, imPtr->imageName);
      if (photoToken == NULL) {
        return;                 /* image doesn't exist or isn't a photo image */
      }
*** src/bltInit.c~  Thu Jun 26 14:21:40 1997
--- src/bltInit.c   Thu Dec  4 15:24:23 1997
***************
*** 407,413 ****
      /* 
       * There must be a better way to export commands 
       */
!     if (Tcl_VarEval(interp, "namespace ", nameSpace, " { namespace export ", 
		specPtr->name, " }", (char *)NULL) != TCL_OK) {
	return TCL_ERROR;
      }
--- 407,413 ----
      /* 
       * There must be a better way to export commands 
       */
!     if (Tcl_VarEval(interp, "namespace eval ", nameSpace, " { namespace export ", 
		specPtr->name, " }", (char *)NULL) != TCL_OK) {
	return TCL_ERROR;
      }
*** src/bltUtil.c~  Mon Jun 23 18:06:43 1997
--- src/bltUtil.c   Thu Dec  4 15:16:53 1997
***************
*** 1257,1263 ****
      register int i;
      int numPixels;

!     photo = Tk_FindPhoto(photoName);
      if (photo == NULL) {
        Tcl_AppendResult(interp, "image \"", photoName, "\" doesn't",
            " exist or is not a photo image", (char *)NULL);
--- 1257,1263 ----
      register int i;
      int numPixels;

!     photo = Tk_FindPhoto(interp, photoName);
      if (photo == NULL) {
        Tcl_AppendResult(interp, "image \"", photoName, "\" doesn't",
            " exist or is not a photo image", (char *)NULL);
*** library/pkgIndex.tcl.in~	Fri Jun 27 15:53:05 1997
--- library/pkgIndex.tcl.in	Tue Apr 21 23:26:06 1998
***************
*** 1,4 ****
  # Tcl package index file, version 1.0
  
! set bltInfo [list load "[file join [file dirname $dir] libBLT@SHLIB_SUFFIX@]" BLT]
! package ifneeded BLT 2.3 $bltInfo
--- 1,10 ----
  # Tcl package index file, version 1.0
  
! package ifneeded BLT @BLT_MAJOR_VERSION@.@BLT_MINOR_VERSION@ [list tclPkgSetup $dir BLT @BLT_MAJOR_VERSION@.@BLT_MINOR_VERSION@ {
!     {../libBLT@SHLIB_SUFFIX@ load {::blt::barchart ::blt::beep ::blt::bgexec \
!             ::blt::bitmap ::blt::bltdebug ::blt::busy ::blt::cutbuffer \
!             ::blt::drag&drop ::blt::graph ::blt::htext ::blt::spline \
!             ::blt::stripchart ::blt::table ::blt::vector ::blt::watch \
!             ::blt::winop}} {
!         bltGraph.tcl source {Blt_ActiveLegend Blt_ClosestPoint Blt_Crosshairs \
!                 Blt_PrintKey Blt_ZoomStack}}}]