d.rast.zoom fix

Posting of a mail message just received.

Date: Fri, 7 Feb 1992 10:42:14 -0500
From: srin@ecn.purdue.edu (Raghavan Srinivasan)
Message-Id: <9202071542.AA05536@thistle.ecn.purdue.edu>
Reply-To: grassp-list@amber.cecer.army.mil
Precedence: Bulk
To: westerve@zorro.cecer.army.mil
Subject: Correction in d.rast.zoom program
Status: R

d.rast.zoom is a function developed at Purdue university. I found
an error in using this program and corrected the same.
This program can be found from src.alpha/display/d.rast.zoom

Pl. replace the program cur_frm_db.c with the following code:

#include "gis.h"

struct Cell_head cur_from_db()
{
    char name[30], window_dir[30];
    struct Cell_head window;
    char *mapset;
    char *G_align_window();

    strcpy(name,"lastwindow");
    strcpy(window_dir,"windows");
    mapset = G_mapset();

    if (G__get_window (&window, window_dir, name, mapset) != NULL){
       G_get_default_window(&window);
        }
    else
        G_system("g.remove region=lastwindow");

    return (window);
}

Thanks.

Srinivasan.