Artifact 0507d515f63f61ef4a8eb4f969fd43ba5a779d4e:
$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]
