Tk Library Source Code

Artifact 3b4a44d9bf170e6914cf07cae65dbed5a1e70164:

Attachment "progressbar.patch" to ticket [806537ffff] added by decosterjos 2003-09-15 21:11:09.

---

202c202
< 		$path.bar coords rect -1 0 [expr {$val*$w/$max}] $h
---
> 		$path.bar coords rect -1 0 [expr {int(double($val)*$w/$max)}] $h