#!/bin/sh
# This program is free software under the GPL (>=v2)
# Read the COPYING file that comes with GRASS for details.

# the next line restarts using wish \
 exec "$GRASS_WISH" "$0" "$@"


# Simply ask if the selected area is ok or not and save
# the answer in the environment variable "env(name)"

    global env
    wm title . "Select this area"
    wm minsize . 250 100
    label .label -text "\nIs this area ok?"
    pack .label 
    frame .buttons
    pack .buttons
    set val ""
    button .buttons.ok -text "Ok" -command {
	exec echo 1 > $env(name)
	destroy .
    }
    button .buttons.no -text "No" -command {
	exec echo 0 > $env(name)
	destroy .
    }
    grid .buttons.ok .buttons.no -padx 3 -pady 3