Index: Info-cbk.plist
==================================================================
--- Info-cbk.plist
+++ Info-cbk.plist
@@ -5,11 +5,11 @@
CFBundleDevelopmentRegion
English
CFBundleExecutable
TextSweep
CFBundleGetInfoString
- TextSweep 4.0.0] (c) 2018 WordTech Communications LLC
+ TextSweep 4.1.0 (c) 2018 WordTech Communications LLC
NSPrincipalClass
NSApplication
NSHighResolutionCapable
NSAppleScriptEnabled
@@ -58,13 +58,13 @@
CFBundleIdentifier
com.codebykevin.com.textsweep-cbk
CFBundlePackageType
APPL
CFBundleShortVersionString
- 4.0.0]
+ 4.1.0
CFBundleVersion
- 4.0.0]
+ 4.1.0
LSMinimumSystemVersion
10.13
LSRequiresCarbon
NSSupportsAutomaticTermination
Index: scriptlibs/machelp/help.txt
==================================================================
--- scriptlibs/machelp/help.txt
+++ scriptlibs/machelp/help.txt
@@ -118,10 +118,14 @@
-------------------
title: TextSweep Version History
alias: History
+'''4.1 (February 20, 2018):'''
+ * Improved resizing of main window for efficient UI.
+ * Removal of console on Windows.
+
'''4.0 (January 1, 2018):'''
* New scripting API for Mac and Windows.
* UI enhancements.
'''3.2 (May 1, 2017):'''
Index: scriptlibs/textsweep/pkgIndex.tcl
==================================================================
--- scriptlibs/textsweep/pkgIndex.tcl
+++ scriptlibs/textsweep/pkgIndex.tcl
@@ -1,3 +1,3 @@
- package ifneeded textsweep 4.0 [list source [file join $dir textsweep.tcl]]
+ package ifneeded textsweep 4.1 [list source [file join $dir textsweep.tcl]]
Index: scriptlibs/textsweep/textsweep-main.tcl
==================================================================
--- scriptlibs/textsweep/textsweep-main.tcl
+++ scriptlibs/textsweep/textsweep-main.tcl
@@ -55,11 +55,11 @@
#handle errors in Tk
proc bgerror {args} {
global cachedir
- puts "TextSweep: An error occurred: $args"
+ puts "TextSweep: An error occurred: $args\n"
}
#make images for buttons et. al from files
proc makeImage {} {
@@ -102,11 +102,11 @@
aboutWindow
}
proc aboutWindow {} {
- tk_messageBox -parent . -icon info -title "About TextSweep" -message "TextSweep: Search and Replace Tool" -detail "Version 4.0\n(c) 2018 WordTech Communications LLC"
+ tk_messageBox -parent . -icon info -title "About TextSweep" -message "TextSweep: Search and Replace Tool" -detail "Version 4.1\n(c) 2018 WordTech Communications LLC"
}
#check file list to ensure existence
@@ -264,18 +264,15 @@
ttk::separator .f.topsep -orient vertical
pack .f.topsep -side top -fill both -expand no
- ttk::frame .f.text
+ ttk::panedwindow .f.text -orient horizontal
pack .f.text -side top -fill both -expand yes
- ttk::frame .f.text.list
- pack .f.text.list -side left -fill both -expand no
-
+ ttk::frame .f.text.list
ttk::frame .f.text.display
- pack .f.text.display -side right -fill both -expand no
#main data display
tablelist::tablelist .f.text.list.listbox -columns {0 "File" } -width 40 -yscrollcommand [list .f.text.list.scrollframe.scroll set] -selectbackground RoyalBlue1 -selectforeground white -stretch all -stripebackground white -relief flat -border 0 -showseparators yes -takefocus 0 -setfocus 1 -activestyle none -exportselection 0
pack .f.text.list.listbox -side left -fill both -expand yes
@@ -289,19 +286,25 @@
pack .f.text.list.scrollframe -fill y -expand no -side right
ttk::scrollbar .f.text.list.scrollframe.scroll -command [list .f.text.list.listbox yview]
pack .f.text.list.scrollframe.scroll -fill y -expand no -side right
-
- text .f.text.t -yscrollcommand [list .f.text.scrollframe.scroll set] -borderwidth 0 -highlightthickness 3 -background white -highlightcolor SlateGray3 -state disabled
- pack .f.text.t -fill both -side left -expand yes
-
- ttk::frame .f.text.scrollframe
- pack .f.text.scrollframe -fill y -side right -expand no
-
- ttk::scrollbar .f.text.scrollframe.scroll -command [list .f.text.t yview]
- pack .f.text.scrollframe.scroll -side right -fill y -expand no
+
+ ttk::frame .f.text.frame
+ pack .f.text.frame -fill both -expand yes
+
+ text .f.text.frame.t -yscrollcommand [list .f.text.frame.scrollframe.scroll set] -borderwidth 0 -highlightthickness 3 -background white -highlightcolor SlateGray3 -state disabled
+ pack .f.text.frame.t -fill both -side left -expand yes
+
+ ttk::frame .f.text.frame.scrollframe
+ pack .f.text.frame.scrollframe -fill y -side right -expand no
+
+ ttk::scrollbar .f.text.frame.scrollframe.scroll -command [list .f.text.frame.t yview]
+ pack .f.text.frame.scrollframe.scroll -side right -fill y -expand no
+
+ .f.text add .f.text.list
+ .f.text add .f.text.frame
ttk::separator .f.bottomsep -orient vertical
pack .f.bottomsep -side top -fill both -expand no
ttk::frame .f.bottom -padding 5
@@ -310,11 +313,11 @@
ttk::button .f.bottom.replaceall -text "Replace in All Files" -command batchReplace
ttk::button .f.bottom.undo -text "Undo" -command batchUndo
pack .f.bottom.replaceall .f.bottom.undo -side right -fill x -expand no
- bind .f.text.t {focus .f.text.t}
+ bind .f.text.frame.t {focus .f.text.frame.t}
bind all <[xplat::controlkey]-Q> exit
bind all <[xplat::controlkey]-q> exit
bind all <[xplat::controlkey]-Z> batchUndo
bind all <[xplat::controlkey]-z> batchUndo
@@ -616,11 +619,11 @@
global appname
global appversion
global datadir
global cachedir
- appname::setAppName TextSweep 4.0
+ appname::setAppName TextSweep 4.1
set datadir [xplat::appconfig TextSweep]
makeImage
Index: scriptlibs/textsweep/textsweep.tcl
==================================================================
--- scriptlibs/textsweep/textsweep.tcl
+++ scriptlibs/textsweep/textsweep.tcl
@@ -1,4 +1,4 @@
-package provide textsweep 4.0
+package provide textsweep 4.1
source [file join [file dirname [info script]] textsweep-main.tcl]
Index: textsweep-changes.tcl
==================================================================
--- textsweep-changes.tcl
+++ textsweep-changes.tcl
@@ -1,2 +1,2 @@
-* New scripting API for Mac and Windows.
-* UI enhancements.
+* Improved resizing of main window for efficient UI.
+* Removal of console on Windows.
Index: textsweep-version.tcl
==================================================================
--- textsweep-version.tcl
+++ textsweep-version.tcl
@@ -1,1 +1,1 @@
-4.0
+4.1