Fix [738bc50e93]: auto_execok doesn't recognise mklink on windows. Remove some unnecessary end-of-line spacing.

1 files changed, 7 insertions, 7 deletions

diff --git a/library/auto.tcl b/library/auto.tcl
index f7cf5f0..ec680de 100644
--- a/library/auto.tcl
+++ b/library/auto.tcl
@@ -16,7 +16,7 @@
 # so that the information gets recomputed the next time it's needed.
 # Also delete any commands that are listed in the auto-load index.
 #
-# Arguments: 
+# Arguments:
 # None.
 
 proc auto_reset {} {
@@ -172,7 +172,7 @@ proc tcl_findLibrary {basename version patch initScript enVarName varName} {
 # parse Tcl source files, writing out index entries as "proc"
 # commands are encountered.  This implementation won't work in a
 # safe interpreter, since a safe interpreter can't create the
-# special parser and mess with its commands.  
+# special parser and mess with its commands.
 
 if {[interp issafe]} {
     return	;# Stop sourcing the file here
@@ -184,7 +184,7 @@ if {[interp issafe]} {
 # followed by any number of glob patterns to use in that directory to
 # locate all of the relevant files.
 #
-# Arguments: 
+# Arguments:
 # dir -		Name of the directory in which to create an index.
 # args -	Any number of additional arguments giving the
 #		names of files within dir.  If no additional
@@ -338,7 +338,7 @@ namespace eval auto_mkindex_parser {
 # handles things like the "proc" command by adding an entry for the
 # index file.  Returns a string that represents the index file.
 #
-# Arguments: 
+# Arguments:
 #	file	Name of Tcl source file to be indexed.
 
 proc auto_mkindex_parser::mkindex {file} {
@@ -455,7 +455,7 @@ proc auto_mkindex_parser::commandInit {name arglist body} {
     if {[string match *::* $name]} {
         set exportCmd [list _%@namespace export [namespace tail $name]]
         $parser eval [list _%@namespace eval $ns $exportCmd]
- 
+
 	# The following proc definition does not work if you
 	# want to tolerate space or something else diabolical
 	# in the procedure name, (i.e., space in $alias)
@@ -528,7 +528,7 @@ auto_mkindex_parser::command proc {name args} {
     variable scriptFile
     # Do some fancy reformatting on the "source" call to handle platform
     # differences with respect to pathnames.  Use format just so that the
-    # command is a little easier to read (otherwise it'd be full of 
+    # command is a little easier to read (otherwise it'd be full of
     # backslashed dollar signs, etc.
     append index [list set auto_index([fullname $name])] \
 	    [format { [list source [file join $dir %s]]} \
@@ -553,7 +553,7 @@ auto_mkindex_parser::hook {
 
 	# AUTO MKINDEX:  tbcload::bcproc name arglist body
 	# Adds an entry to the auto index list for the given pre-compiled
-	# procedure name.  
+	# procedure name.
 
 	auto_mkindex_parser::commandInit tbcload::bcproc {name args} {
 	    variable index