1 files changed, 0 insertions, 62 deletions
diff --git a/tkimg/libjpeg/jpegtclStubLib.c b/tkimg/libjpeg/jpegtclStubLib.c
deleted file mode 100755
index 033da8c..0000000
--- a/tkimg/libjpeg/jpegtclStubLib.c
+++ /dev/null
@@ -1,62 +0,0 @@
-/*
- * jpegtclStubLib.c --
- *
- *	Stub object that will be statically linked into extensions that wish
- *	to access the JPEGTCL API.
- *
- * Copyright (c) 2002 Andreas Kupries <andreas_kupries@users.sourceforge.net>
- * Copyright (c) 2002 Andreas Kupries <andreas_kupries@users.sourceforge.net>
- *
- * See the file "license.terms" for information on usage and redistribution
- * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
- *
- * RCS: @(#) $Id: jpegtclStubLib.c 240 2010-04-09 12:03:28Z nijtmans $
- */
-
-#ifndef USE_TCL_STUBS
-#define USE_TCL_STUBS
-#endif
-
-#include "jpegtcl.h"
-
-const JpegtclStubs *jpegtclStubsPtr;
-
-/*
- *----------------------------------------------------------------------
- *
- * Jpegtcl_InitStubs --
- *
- *	Checks that the correct version of Blt is loaded and that it
- *	supports stubs. It then initialises the stub table pointers.
- *
- * Results:
- *	The actual version of BLT that satisfies the request, or
- *	NULL to indicate that an error occurred.
- *
- * Side effects:
- *	Sets the stub table pointers.
- *
- *----------------------------------------------------------------------
- */
-
-#ifdef Jpegtcl_InitStubs
-#undef Jpegtcl_InitStubs
-#endif
-
-MODULE_SCOPE const char *
-Jpegtcl_InitStubs(interp, version, exact)
-    Tcl_Interp *interp;
-    const char *version;
-    int exact;
-{
-    const char *result;
-    ClientData data;
-
-    result = Tcl_PkgRequireEx(interp, PACKAGE_NAME, (CONST84 char *) version, exact, &data);
-    if (!result || !data) {
-        return NULL;
-    }
-
-    jpegtclStubsPtr = (const JpegtclStubs *) data;
-    return result;
-}