Fix trailing spaces

makeTclKit.tcl

@@ -1,7 +1,7 @@
 #!/usr/bin/env tclsh
 
 #Создан:  Ср 29 июн 2011 22:35:00
-#Изменён: Пн 14 апр 2014 22:42:56
+#Изменён: Сб 19 окт 2019 06:04:57
 
 #****F* main/nprs *****************************************************
 #
@@ -12,16 +12,16 @@
 #    Copyright (C) 2011-2014, Likhachev Maxim, mail@domain.com
 #
 # LICENSE
-#     
+#
 #     This program is free software: you can redistribute it and/or modify it
 #     under the terms of the GNU General Public License as published by the Free
 #     Software Foundation, version 3.
-#    
+#
 #     This program is distributed in the hope that it will be useful,
 #     but WITHOUT ANY WARRANTY; without even the implied warranty of
 #     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
 #     GNU General Public License for more details.
-#    
+#
 #     You should have received a copy of the GNU General Public License
 #     along with this program. If not, see <http://www.gnu.org/licenses/>.
 #
@@ -50,7 +50,7 @@ namespace eval package {
 	proc whereis? {package} {
 		lindex [package ifneeded $package [package require $package]] 1
 	}
-	
+
 	#Copying package in local directory
 	proc copy {package _to directory} {
 		if {"$package" eq "sqlite3"} {
@@ -165,7 +165,7 @@ proc fileNotFound {filetype directory filename} {
 			[string repeat { } [expr $posUI - $posArch - 3]] |"
 	puts "       UI [string repeat {-} $posUI]--+\n"
 	puts " All tclkit wrappers can be found on tclkit web page: http://equi4.com/pub/tk/downloads.html\n"
-		
+
 	exit 1
 }