Tk Library Source Code

Artifact 0507d515f63f61ef4a8eb4f969fd43ba5a779d4e:

Attachment "patch-apps_bitmap-editor" to ticket [28d0c78144] added by stwo 2013-11-08 21:17:48.

---

$OpenBSD$
--- apps/bitmap-editor.orig	Wed Oct 30 14:44:52 2013
+++ apps/bitmap-editor	Fri Nov  8 11:55:42 2013
@@ -404,6 +404,7 @@ proc ParseBMP {raw} {
 #
 
 proc OpenBMP {} {
+    global S
     set types { {{BMP Files} {.bmp}} {{All Files} * }}
     set fname [tk_getOpenFile -defaultextension ".bmp" -initialfile $S(fname) \
                    -filetypes $types]