[GRASS-dev] Re: gis.m, thematic layer: You must open a display monitor

[Moritz Lennert]

On 02/03/07 10:42, Maris Nartiss wrote:
> Sorry, copy-paste introduced typo by me. Attached patch should fix
> problem. Please, test and commit.

Thanks, that was it.
Committed to CVS.

Moritz

> 
> Maris.
> 
> 2007/3/2, Moritz Lennert <mlennert at club.worldonline.be>:
>> On 02/03/07 08:59, Daniel Calvelo wrote:
>> > Sorry for the awful delay. I think the problems with d.mon select are
>> > resolved; please test. I also made the legend cuts work for ps.map and
>> > display managers. In CVS.
>>
>> I get the following error. The line
>>
>> format [G_msg "Legend for Map %d, %s"] $mon, $opt($id,1,map)
>>
>> seems to be the problem.
>>
>>
>> Moritz
>>
>>
>> expected integer but got "1,"
>> expected integer but got "1,"
>>      while executing
>> "format [G_msg "Legend for Map %d, %s"] $mon, $opt($id,1,map)"
>>      (procedure "GmThematic::tlegend" line 11)
>>      invoked from within
>> "GmThematic::tlegend $mon $id"
>>      (procedure "GmThematic::display" line 72)
>>      invoked from within
>> "GmThematic::display $node $mod"
>>      ("thematic" arm line 2)
>>      invoked from within
>> "switch $type {
>>          group {
>>              GmGroup::display $node $mod
>>         }
>>         raster {
>>             GmRaster::display $node $mod
>>         }
>>         labels {
>>             GmLabels::disp..."
>>      (procedure "GmTree::display_node" line 7)
>>      invoked from within
>> "GmTree::display_node $n $mod"
>>      (procedure "GmGroup::display" line 22)
>>      invoked from within
>> "GmGroup::display "root" $mod"
>>      (procedure "MapCanvas::runprograms" line 64)
>>      invoked from within
>> "MapCanvas::runprograms $mon [expr {$mymodified != 0}]"
>>      (procedure "MapCanvas::drawmap" line 38)
>>      invoked from within
>> "MapCanvas::drawmap $mon"
>>      (procedure "MapCanvas::display_server" line 9)
>>      invoked from within
>> "MapCanvas::display_server"
>>      ("after" script)
>>
>>
> 
> ------------------------------------------------------------------------
> 
> Index: gui/tcltk/gis.m/thematic.tcl
> ===================================================================
> RCS file: /home/grass/grassrepository/grass6/gui/tcltk/gis.m/thematic.tcl,v
> retrieving revision 1.25
> diff -u -u -r1.25 thematic.tcl
> --- gui/tcltk/gis.m/thematic.tcl	22 Feb 2007 15:45:29 -0000	1.25
> +++ gui/tcltk/gis.m/thematic.tcl	2 Mar 2007 09:39:41 -0000
> @@ -619,7 +619,7 @@
>  
>  	if { [winfo exists .tlegend($mon,$id)] } {return}
>  
> -	set legendtitle [format [G_msg "Legend for Map %d, %s"] $mon, $opt($id,1,map)]
> +	set legendtitle [format [G_msg "Legend for Map %d, %s"] $mon $opt($id,1,map)]
>  	toplevel .tlegend($mon,$id)
>      wm title .tlegend($mon,$id) $legendtitle
>