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