Index: /branches/eam_branches/ipp-20101205/Ohana/src/opihi/cmd.astro/region.c
===================================================================
--- /branches/eam_branches/ipp-20101205/Ohana/src/opihi/cmd.astro/region.c	(revision 30224)
+++ /branches/eam_branches/ipp-20101205/Ohana/src/opihi/cmd.astro/region.c	(revision 30225)
@@ -18,8 +18,28 @@
   FREE (name);
 
+  NoClear = FALSE;
+  if ((N = get_argument (argc, argv, "-no-clear"))) {
+    remove_argument (N, &argc, argv);
+    NoClear = TRUE;
+  }
+
   if ((N = get_argument (argc, argv, "-image"))) {
     remove_argument (N, &argc, argv);
     KapaGetImageCoords (kapa, &graphmode.coords);
     KapaGetImageRange (kapa, &graphmode.xmin, &graphmode.xmax, &graphmode.ymax, &graphmode.ymin);
+
+    set_variable ("XMIN", graphmode.xmin);
+    set_variable ("XMAX", graphmode.xmax);
+    set_variable ("YMIN", graphmode.ymin);
+    set_variable ("YMAX", graphmode.ymax);
+
+    set_variable ("RMIN", Ra  + graphmode.xmin);
+    set_variable ("RMAX", Ra  + graphmode.xmax);
+    set_variable ("DMIN", Dec + graphmode.ymin);
+    set_variable ("DMAX", Dec + graphmode.ymax);
+
+    if (!NoClear) KapaClearSections (kapa);
+    KapaSetLimits (kapa, &graphmode);
+
     SetGraph (&graphmode);
     return (TRUE);
@@ -45,10 +65,4 @@
     remove_argument (N, &argc, argv);
     graphmode.flipnorth = FALSE;
-  }
-
-  NoClear = FALSE;
-  if ((N = get_argument (argc, argv, "-no-clear"))) {
-    remove_argument (N, &argc, argv);
-    NoClear = TRUE;
   }
 
