5adcf6bc2904690de7b7b30a83ec8a7a0996abe9
galt
  Tue Aug 21 00:01:25 2018 -0700
changing cse subdomain to soe

diff --git src/utils/qa/compareTrackDbFast.csh src/utils/qa/compareTrackDbFast.csh
index b54ea23..912ec40 100755
--- src/utils/qa/compareTrackDbFast.csh
+++ src/utils/qa/compareTrackDbFast.csh
@@ -80,50 +80,50 @@
 # -- not RR node-specific
 set pubMySqlFlag=0
 set tableRow=""
 if ( $field == "html" || $field == "settings" ) then
   rm -f $machine1.$db.$table
   rm -f $machine2.$db.$table
   set tracks=`hgsql -N -h $sqlbeta -e "SELECT tableName FROM trackDb" $db`
   foreach row ( $tracks )
     set tableRow=$row
     foreach machX ( $machine1 $machine2 )
       if ( $machX == "hgwbeta" ) then
         hgsql -h $sqlbeta -e 'SELECT '$field' FROM trackDb \
           WHERE tableName = "'$tableRow'"' $db > $machX.$db.$table.$field
       else
         set pubMySqlFlag=1
-        mysql --user=genome --host=genome-mysql.cse.ucsc.edu -A \
+        mysql --user=genome --host=genome-mysql.soe.ucsc.edu -A \
           -e 'SELECT '$field' FROM trackDb \
           WHERE tableName = "'$tableRow'"' $db > $machX.$db.$table.$field
       endif
       cat $machX.$db.$table.$field | perl -pw -e "s/\\n/\n/g" \
           | sed -e "s/^/${tableRow} \| /" >> $machX.$db.$table
       rm -f $machX.$db.$table.$field
     end
   end
 
 else
 
   foreach mach ( $machine1 $machine2 )
     rm -f $mach.$db.$table 
     if ( $mach == "hgwbeta" ) then
       hgsql -h $sqlbeta -e 'SELECT '$field' FROM trackDb' $db \
          > $mach.$db.$table
     else
       set pubMySqlFlag=1
-      mysql --user=genome --host=genome-mysql.cse.ucsc.edu -A \
+      mysql --user=genome --host=genome-mysql.soe.ucsc.edu -A \
         -e "SELECT $field FROM trackDb"  $db > $mach.$db.$table
     endif
   end
 endif
 
 # DO NOT CHANGE this output, unless you want to change all of the following, too:
 # compareTrackDbs.csh
 # compareTrackDbAll.csh
 # trackDbGlobal.csh
   
 echo
 echo "---------------------------------------------------------------"
 echo 
 # if the line begins with a digit, substitute a newline at the beginning
 # | perl -pw -e "s/^(\d)/\nx/"