[GRASS-dev] [bug #4501] (grass) gis.m: using percent in ps text layer crashes display and workspace saving

[Request Tracker]

this bug's URL: http://intevation.de/rt/webrt?serial_num=4501
-------------------------------------------------------------------------

Subject: gis.m: using percent in ps text layer crashes display and workspace saving

Platform: GNU/Linux/x86
grass obtained from: CVS
grass binary for platform: Compiled from Sources
GRASS Version: cvs_head_20060523

In gis.m, when I choose "percent" as coordinate type for text placement and then click on the display button in the map display I get the following error message the map display freezes with the message "please wait" at the bottom.


can't read "canvas_w(1)": no such variable
can't read "canvas_w(1)": no such variable
    while executing
"expr ($opt($id,xcoord) / 100.0) * $canvas_w($mon)"
    (procedure "GmCtext::display" line 36)
    invoked from within
"GmCtext::display $node"
    ("ctext" arm line 2)
    invoked from within
"switch $type {
		clabels {
			GmCLabels::display $node
		}
		cgrid {
			GmcGridl::display $node
		}
		cframe {
			GmCframe::display $node
		}
		cbarsc..."
    (procedure "GmTree::display_cvnode" line 6)
    invoked from within
"GmTree::display_cvnode $n"
    (procedure "GmTree::cvdisplay" line 8)
    invoked from within
"GmTree::cvdisplay "root""
    (procedure "MapCanvas::composite" line 26)
    invoked from within
"MapCanvas::composite $mon"
    (procedure "MapCanvas::drawmap" line 45)
    invoked from within
"MapCanvas::drawmap $mon"
    (procedure "MapCanvas::display_server" line 9)
    invoked from within
"MapCanvas::display_server"
    ("after" script)


Linked to that, when I try to save the workspace file, I get:

can't read "opt(1,east_north)": no such element in array
can't read "opt(1,east_north)": no such element in array
    while executing
"GmTree::rc_write $depth "$key $opt($id,$key)""
    (procedure "GmCtext::save" line 7)
    invoked from within
"GmCtext::save $tree($mon) $depth $node"
    ("ctext" arm line 4)
    invoked from within
"switch $type {
		group {
            GmTree::rc_write $depth Group $name
            incr depth
			GmGroup::save $tree($mon) $depth $node
		}
		raster..."
    (procedure "GmTree::save_node" line 15)
    invoked from within
"GmTree::save_node $depth $n"
    (procedure "GmGroup::save" line 11)
    invoked from within
"GmGroup::save $tree($mon) 0 "root""
    (procedure "GmTree::save" line 11)
    invoked from within
"GmTree::save $filename($mon)"
    (procedure "Gm::SaveFileBox" line 13)
    invoked from within
"Gm::SaveFileBox"
    ("uplevel" body line 1)
    invoked from within
"uplevel \#0 $cmd"
    (procedure "Button::_release" line 18)
    invoked from within
"Button::_release .mainframe.topf.tb1.bbox3.b2"
    (command bound to event)


Moritz

-------------------------------------------- Managed by Request Tracker