diff options
Diffstat (limited to 'library/demos/search.tcl')
| -rw-r--r-- | library/demos/search.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/library/demos/search.tcl b/library/demos/search.tcl index a1a3d7f..b4beb28 100644 --- a/library/demos/search.tcl +++ b/library/demos/search.tcl @@ -92,7 +92,7 @@ entry $w.file.entry -width 40 -textvariable fileName button $w.file.button -text "Load File" \ -command "textLoadFile $w.text \$fileName" pack $w.file.label $w.file.entry -side left -pack $w.file.button -side left -pady 5 -padx 10 +pack $w.file.button -side left -pady 3p -padx 7.5p bind $w.file.entry <Return> " textLoadFile $w.text \$fileName focus $w.string.entry @@ -105,7 +105,7 @@ entry $w.string.entry -width 40 -textvariable searchString button $w.string.button -text "Highlight" \ -command "textSearch $w.text \$searchString search" pack $w.string.label $w.string.entry -side left -pack $w.string.button -side left -pady 5 -padx 10 +pack $w.string.button -side left -pady 3p -padx 7.5p bind $w.string.entry <Return> "textSearch $w.text \$searchString search" text $w.text -yscrollcommand "$w.scroll set" -setgrid true |