From 68b1df57ffd86cff434cc88071cd25fab54b9b11 Mon Sep 17 00:00:00 2001
From: dgp <dgp@users.sourceforge.net>
Date: Sat, 21 Jul 2001 20:26:42 +0000
Subject: 	* Corrected documentation and usage message of [pkg_mkIndex].

---
 ChangeLog           | 6 ++++++
 doc/pkgMkIndex.n    | 8 ++++++--
 library/package.tcl | 4 ++--
 3 files changed, 14 insertions(+), 4 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index df6a0cb..b7f8cb5 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2001-07-21  Don Porter  <dgp@users.sourceforge.net>
+
+	* doc/pkgMkindex.n:
+	* library/package.tcl:  Corrected documentation and usage
+	message of [pkg_mkIndex].
+
 2001-07-18  Mo DeJong  <mdejong@redhat.com>
 
 	* generic/tclPlatDecls.h: Define TCHAR by including
diff --git a/doc/pkgMkIndex.n b/doc/pkgMkIndex.n
index a8d2069..3147067 100644
--- a/doc/pkgMkIndex.n
+++ b/doc/pkgMkIndex.n
@@ -4,7 +4,7 @@
 '\" See the file "license.terms" for information on usage and redistribution
 '\" of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 '\" 
-'\" RCS: @(#) $Id: pkgMkIndex.n,v 1.10 2000/09/07 14:27:50 poenitz Exp $
+'\" RCS: @(#) $Id: pkgMkIndex.n,v 1.11 2001/07/21 20:26:42 dgp Exp $
 '\" 
 .so man.macros
 .TH pkg_mkIndex n 8.3 Tcl "Tcl Built-In Commands"
@@ -15,7 +15,7 @@ pkg_mkIndex \- Build an index for automatic loading of packages
 .SH SYNOPSIS
 .nf
 .VS 8.3.0
-\fBpkg_mkIndex ?\fI\-lazy\fR? ?\fI\-load pkgPat\fR? ?\fI\-verbose\fR? \fIdir\fR ?\fIpattern pattern ...\fR?
+\fBpkg_mkIndex ?\fI\-direct\fR?  ?\fI\-lazy\fR?  ?\fI\-load pkgPat\fR? ?\fI\-verbose\fR? \fIdir\fR ?\fIpattern pattern ...\fR?
 .VE
 .fi
 .BE
@@ -102,6 +102,10 @@ interpreters.
 .SH OPTIONS
 The optional switches are:
 .TP 15
+\fB\-direct\fR
+The generated index will implement direct loading of the package
+upon \fBpackage require\R.  This is the default.
+.TP 15
 \fB\-lazy\fR
 The generated index will manage to delay loading the package until the
 use of one of the commands provided by the package, instead of loading
diff --git a/library/package.tcl b/library/package.tcl
index 9049444..4dc1859 100644
--- a/library/package.tcl
+++ b/library/package.tcl
@@ -3,7 +3,7 @@
 # utility procs formerly in init.tcl which can be loaded on demand
 # for package management.
 #
-# RCS: @(#) $Id: package.tcl,v 1.17 2001/03/14 18:25:40 dgp Exp $
+# RCS: @(#) $Id: package.tcl,v 1.18 2001/07/21 20:26:42 dgp Exp $
 #
 # Copyright (c) 1991-1993 The Regents of the University of California.
 # Copyright (c) 1994-1998 Sun Microsystems, Inc.
@@ -87,7 +87,7 @@ proc pkg_compareExtension { fileName {ext {}} } {
 
 proc pkg_mkIndex {args} {
     global errorCode errorInfo
-    set usage {"pkg_mkIndex ?-direct? ?-verbose? ?-load pattern? ?--? dir ?pattern ...?"};
+    set usage {"pkg_mkIndex ?-direct? ?-lazy? ?-load pattern? ?-verbose? ?--? dir ?pattern ...?"};
 
     set argCount [llength $args]
     if {$argCount < 1} {
-- 
cgit v0.12