Tcl Source Code

Artifact [954626e105]
Login

Artifact 954626e1052b863653e845c67f4ffa1f2d3a28c1:

Attachment "winhelp.diff" to ticket [480268ffff] added by pspjuth 2001-11-10 07:36:52.
Index: doc/FileSystem.3
===================================================================
RCS file: /cvsroot/tcl/tcl/doc/FileSystem.3,v
retrieving revision 1.9
diff -u -r1.9 FileSystem.3
--- doc/FileSystem.3	2001/10/15 10:30:07	1.9
+++ doc/FileSystem.3	2001/11/10 00:21:46
@@ -243,7 +243,7 @@
 reference to the passed in object, and so one must not assume that
 after any of these calls return, the object still has a refCount of
 zero - it may have been incremented.  The practical lesson to learn
-from this is that \fbTcl_Obj *path = Tcl_NewStringObj(...) ;
+from this is that \fBTcl_Obj *path = Tcl_NewStringObj(...) ;
 Tcl_FS...(path) ; Tcl_DecrRefCount(path)\fR is wrong, and may
 segfault.  The 'path' must have its refCount incremented before
 passing it in, or decrementing it.
@@ -279,8 +279,8 @@
 given lie in the same filesystem (according to
 \fBTcl_FSGetFileSystemForPath\fR) then that filesystem's 'rename file' function
 is called (if it is non-NULL).  Otherwise the function returns -1 and
-sets Tcl's errno to the 'EXDEV' posix error code (which signifies a
-'cross-domain link').
+sets Tcl's errno to the 'EXDEV' posix error code (which signifies
+a 'cross-domain link').
 .PP
 \fBTcl_FSListVolumes\fR calls each filesystem which has a non-NULL 'list
 volumes' function and asks them to return their list of root volumes.  It
@@ -501,8 +501,8 @@
 \fBTcl_FSGetInternalRep\fR extracts the internal representation of a given
 path object, in the given filesystem.  If the path object belongs to a
 different filesystem, we return NULL. If the internal representation is
-currently NULL, we attempt to generate it, by calling the filesystem's
-'TclfsConvertToInternalProc_'.
+currently NULL, we attempt to generate it, by calling the
+filesystem's 'TclfsConvertToInternalProc_'.
 .PP
 Returns NULL or a valid internal path representation.  This internal
 representation is cached, so that repeated calls to this function will
@@ -734,8 +734,8 @@
 .PP
 Function to normalize a path.  Should be implemented for all
 filesystems which can have multiple string representations for the same
-path object.  In Tcl, every 'path' must have a single unique
-'normalized' string representation.  Depending on the filesystem,
+path object.  In Tcl, every 'path' must have a single unique 'normalized'
+string representation.  Depending on the filesystem,
 there may be more than one unnormalized string representation which
 refers to that path (e.g. a relative path, a path with different
 character case if the filesystem is case insensitive, a path contain a
@@ -963,8 +963,8 @@
 .SH FILEATTRSTRINGSPROC
 .PP
 Function to list all attributes strings which are valid for this
-filesystem.  If not implemented the filesystem will not support the
-'file attributes' command.  This allows arbitrary additional
+filesystem.  If not implemented the filesystem will not support
+the 'file attributes' command.  This allows arbitrary additional
 information to be attached to files in the filesystem.  If it is
 not implemented, there is no need to implement the 'get' and 'set'
 methods.
@@ -1075,8 +1075,8 @@
 .PP
 Function to process a 'Tcl_FSLstat()' call.  If not implemented, Tcl
 will attempt to use the 'statProc' defined above instead.  Therefore
-it need only be implemented if a filesystem can differentiate between
-'stat' and 'lstat' calls.
+it need only be implemented if a filesystem can differentiate
+between 'stat' and 'lstat' calls.
 .PP
 .CS
 typedef int Tcl_FSLstatProc(
Index: doc/StdChannels.3
===================================================================
RCS file: /cvsroot/tcl/tcl/doc/StdChannels.3,v
retrieving revision 1.3
diff -u -r1.3 StdChannels.3
--- doc/StdChannels.3	2001/09/10 23:33:24	1.3
+++ doc/StdChannels.3	2001/11/10 00:21:46
@@ -7,7 +7,7 @@
 '\" RCS: @(#) $Id: StdChannels.3,v 1.3 2001/09/10 23:33:24 andreas_kupries Exp $
 '\" 
 .so man.macros
-.TH Standard channels 3 7.5 Tcl "Tcl Library Procedures"
+.TH "Standard channels" 3 7.5 Tcl "Tcl Library Procedures"
 .BS
 '\" Note:  do not modify the .SH NAME line immediately below!
 .SH NAME
Index: doc/file.n
===================================================================
RCS file: /cvsroot/tcl/tcl/doc/file.n,v
retrieving revision 1.9
diff -u -r1.9 file.n
--- doc/file.n	2001/11/02 12:06:27	1.9
+++ doc/file.n	2001/11/10 00:21:46
@@ -225,8 +225,8 @@
 .
 Returns a unique normalised path representation for the file, whose string
 value can be used as a unique identifier for the it.  A normalized path is
-one which has all '../', './' removed.  Also it is one which is in the
-'standard' format for the native platform.  On MacOS, Unix, this means the
+one which has all '../', './' removed.  Also it is one which is in
+the 'standard' format for the native platform.  On MacOS, Unix, this means the
 path must be free of symbolic links/aliases, and on Windows it means we want
 the long form, with the long form's case-dependence (which gives us a
 unique, case-dependent path).
Index: doc/tcltest.n
===================================================================
RCS file: /cvsroot/tcl/tcl/doc/tcltest.n,v
retrieving revision 1.11
diff -u -r1.11 tcltest.n
--- doc/tcltest.n	2001/03/30 00:56:16	1.11
+++ doc/tcltest.n	2001/11/10 00:21:47
@@ -617,8 +617,9 @@
 on a pipe 
 .TP
 \fIunixExecs\fR
-test can only be run if this machine has Unix-style commands 'cat', 'echo',
-'sh', 'wc', 'rm', 'sleep', 'fgrep', 'ps', 'chmod', and 'mkdir' available
+test can only be run if this machine has Unix-style
+commands 'cat', 'echo', 'sh', 'wc', 'rm', 'sleep', 'fgrep', 'ps', 'chmod',
+and 'mkdir' available
 .TP
 \fIhasIsoLocale\fR
 test can only be run if can switch to an ISO locale
@@ -878,8 +879,8 @@
 See the \fI"Constraints"\fR section for information about using
 built-in constraints and adding new ones.
 .PP
-When tests are run from within an 'all.tcl' file, all files with a
-'.test' extension are normally run.  An individual test file will be
+When tests are run from within an 'all.tcl' file, all files with
+a '.test' extension are normally run.  An individual test file will be
 skipped if one of the following conditions is met:
 .IP [1]
 the \fIname\fR of the test files does not match (using glob style matching)
Index: tools/man2help.tcl
===================================================================
RCS file: /cvsroot/tcl/tcl/tools/man2help.tcl,v
retrieving revision 1.7
diff -u -r1.7 man2help.tcl
--- tools/man2help.tcl	2000/11/24 14:17:12	1.7
+++ tools/man2help.tcl	2001/11/10 00:21:47
@@ -99,7 +99,7 @@
 proc doDir dir {
     puts "Generating man pages for $dir..."
     foreach f [lsort [glob -directory $dir "*.\[13n\]"]] {
-	do $f
+	doFile $f
     }
 }
 
Index: tools/man2help2.tcl
===================================================================
RCS file: /cvsroot/tcl/tcl/tools/man2help2.tcl,v
retrieving revision 1.6
diff -u -r1.6 man2help2.tcl
--- tools/man2help2.tcl	2000/04/04 08:05:32	1.6
+++ tools/man2help2.tcl	2001/11/10 00:21:47
@@ -271,7 +271,8 @@
 	    }
 	    tab
 	}
-	AS {}				;# next page and previous page
+	AS {				;# next page and previous page
+        }
 	br {
 	    lineBreak	
 	}
@@ -510,7 +511,7 @@
 	    }
 	    o {
 		text "\\'"
-		regexp "'([^']*)'(.*)" $text all ch text
+		regexp {'([^']*)'(.*)} $text all ch text
 		text $chars($ch)
 	    }
 	    default {
@@ -705,7 +706,7 @@
 
     set args [join $argList " "]
     if {[llength $argList] < 1} {
-	puts stderr "Bad .SH macro: .$name $args"
+	puts stderr "Bad .SH macro: .SH $args"
     }
 
     # control what the text proc does with text
@@ -827,7 +828,7 @@
 
     if {[llength $argList] != 5} {
 	set args [join $argList " "]
-	puts stderr "Bad .TH macro: .$name $args"
+	puts stderr "Bad .TH macro: .TH $args"
     }
     incr curID
     set name	[lindex $argList 0]		;# Tcl_UpVar