From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <insight-return-3940-listarch-insight=sources.redhat.com@sources.redhat.com>
Received: (qmail 17069 invoked by alias); 19 Dec 2002 07:04:23 -0000
Mailing-List: contact insight-help@sources.redhat.com; run by ezmlm
Precedence: bulk
List-Subscribe: <mailto:insight-subscribe@sources.redhat.com>
List-Archive: <http://sources.redhat.com/ml/insight/>
List-Post: <mailto:insight@sources.redhat.com>
List-Help: <mailto:insight-help@sources.redhat.com>, <http://sources.redhat.com/ml/#faqs>
Sender: insight-owner@sources.redhat.com
Received: (qmail 17045 invoked from network); 19 Dec 2002 07:04:21 -0000
Received: from unknown (HELO redhat.com) (66.30.22.225)
  by 209.249.29.67 with SMTP; 19 Dec 2002 07:04:21 -0000
Received: by redhat.com (Postfix, from userid 201)
	id BD2F51C10B; Thu, 19 Dec 2002 02:04:16 -0500 (EST)
Date: Wed, 18 Dec 2002 23:04:00 -0000
From: Christopher Faylor <cgf@redhat.com>
To: insight@sources.redhat.com
Subject: [RFA] Find init.tcl on cygwin
Message-ID: <20021219070416.GA21543@redhat.com>
Mail-Followup-To: insight@sources.redhat.com
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Disposition: inline
User-Agent: Mutt/1.5.1i
X-SW-Source: 2002-q4/txt/msg00224.txt.bz2

This has been sitting in my sandbox for a long time.

Ok to check in?

cgf

2002-12-19  Christopher Faylor  <cgf@redhat.com>

	* win/tclWinInit.c (TclpInitLibraryPath): Default to correct location
	for installLib on cygwin.

Index: tclWinInit.c
===================================================================
RCS file: /cvs/uberbaum/tcl/win/tclWinInit.c,v
retrieving revision 1.4
diff -u -p -r1.4 tclWinInit.c
--- tclWinInit.c        26 Nov 2002 19:48:07 -0000      1.4
+++ tclWinInit.c        19 Dec 2002 07:02:02 -0000
@@ -196,7 +196,7 @@ TclpInitLibraryPath(path)
      */
 
     /* CYGNUS LOCAL */
-    sprintf(installLib, "share/tcl%s", TCL_VERSION);
+    sprintf(installLib, "usr/share/tcl%s", TCL_VERSION);
     /* END CYGNUS LOCAL */
     sprintf(developLib, "../tcl%s/library",
            ((TCL_RELEASE_LEVEL < 2) ? TCL_PATCH_LEVEL : TCL_VERSION));