282 |
|
pack $w.left -side left |
283 |
|
button $w.left.load -text LOAD -width 5 \ |
284 |
|
-relief raised -command {newload $curfile} |
285 |
< |
button $w.left.save -text SAVE -width 5 \ |
286 |
< |
-relief raised -command {newsave $curfile} |
285 |
> |
button $w.left.save -text SAVE -width 5 -relief raised \ |
286 |
> |
-command "newsave \$curfile; update_dir $w.right" |
287 |
|
button $w.left.new -text NEW -width 5 \ |
288 |
|
-relief raised -command {newnew $curfile} |
289 |
|
pack $w.left.load $w.left.save $w.left.new -side top -pady 15 -padx 20 |