Changeset 119 for SH_SHM/trunk

Timestamp:

05/11/2009 07:00:34 PM (14 years ago)

Author:

marcus

Message:

r82 | svn | 2009-04-30 09:16:57 +0200 (Do, 30 Apr 2009) | 1 line

change :LOC behaviour

Location:

SH_SHM/trunk/source/motif

Files:

• mfexec.c (modified) (2 diffs)
• shm.c (modified) (3 diffs)

SH_SHM/trunk/source/motif/mfexec.c

@@ -3 +3 @@
  *      ========
  *
- * $Revision: 53 $, $Date: 2008-10-21 09:13:49 +0200 (Di, 21 Okt 2008) $
+ * $Revision: 82 $, $Date: 2009-04-30 09:16:57 +0200 (Do, 30 Apr 2009) $
  *
  * execution of SH commands
@@ -382 +382 @@
                         if  (!epifound)  {
                                 /* no epicentre in evt file, behave like :AE */
+                                /* not a good idea, maybe no stations in the autoevt file */
+                                /*
                                 printf( "*SHM: cannot translate :LOC, no epicentre found -> :AE\n" );
                                 mxh_translate_button_name( ":AE", autoevt, addlist, status );
                                 return;
+                                */
+                                /* the following should result in the default station list */
+                                epilat = 1000.0;
+                                epilon = 1000.0;
                         } /*endif*/
                         if  (GpGetInt(cGpI_debug_level) > 2)

SH_SHM/trunk/source/motif/shm.c

@@ -3 +3 @@
  *      =====
  *
- * $Revision: 81 $, $Date: 2009-04-17 12:52:47 +0200 (Fr, 17 Apr 2009) $
+ * $Revision: 82 $, $Date: 2009-04-30 09:16:57 +0200 (Do, 30 Apr 2009) $
  *
  * main module of shm
@@ -3460 +3460 @@
         case k_entry_del_location:
                 HELPTEXT( "del-location" );
+                /*
                 xmv_cpar->source_lat = 0.0;
                 xmv_cpar->source_lon = 0.0;
+                xmv_cpar->origin[0] = '\0';
                 xmv_cpar->depth = GpGetFloat( cGpF_default_depth );
                 xmv_cpar->source_type = GpGetInt( cGpI_default_event_type );
@@ -3472 +3474 @@
                 xmv_cpar->dist_unit = CUC_DIST_UNIT_DEG;
                 xmv_cpar->source[0] = '\0';
+                */
+                cu_reset_parameters( xmv_cpar );
                 xmv_cpar->soft_change = TRUE;
                 cu_set_param_values( xmv_w, xmv_cpar, xmv_par.parno );