X-Git-Url: http://www.wagner.pp.ru/gitweb/?p=oss%2Ffgis.git;a=blobdiff_plain;f=tcl%2Fmapview;fp=tcl%2Fmapview;h=f88ebdaf7fd30508f1ae35df946e07ebefe9431d;hp=a4aa6eb77ac9e2fbb0fe41be1ef552cffa830422;hb=de42f9868f7325086d509049195235d4a439e0c4;hpb=96a9075a6b6a85c93540b7e94c719e496823674d

diff --git a/tcl/mapview b/tcl/mapview
index a4aa6eb..f88ebda 100755
--- a/tcl/mapview
+++ b/tcl/mapview
@@ -1,6 +1,6 @@
 #!/usr/bin/wish
 ##
-## $ID: $
+## $Id: mapview,v 1.3 2003-01-08 15:25:35 dron Exp $
 ##
 ## Copyright (C) 1997, Victor Wagner <vitus@ice.ru>
 ## Copyright (C) 2002, Andrey Kiselev <dron@remotesensing.org>
@@ -22,7 +22,7 @@
 
 package require Fgis
 set planchet .map
-option add *font -cronyx-times-bold-r-normal--10-*
+option add *font $gui_font
 frame .menu -relief raised -bd 2
 menubutton .menu.file -text "File" -menu [set m .menu.file.m]
 menu $m