Index: trunk/ippMonitor/czartool/czartool/Pantasks.pm
===================================================================
--- trunk/ippMonitor/czartool/czartool/Pantasks.pm	(revision 41129)
+++ trunk/ippMonitor/czartool/czartool/Pantasks.pm	(revision 41132)
@@ -7,20 +7,25 @@
 
 my @servers = (
-#        "addstar", 
-#        "addstarlap",
-        "ippqub:stdscience_ws",
+##### standard pantasks ######
         "cleanup", 
-#        "deepstack",
-#        "detrend", 
         "distribution", 
         "pstamp", 
-#        "update", 
-#        "publishing", 
         "registration", 
-        "replication", 
         "stack", 
         "stdscience", 
-        "summitcopy"
+        "summitcopy",
+##### additional pantasks ######
+        "addstar", 
+        "addstarlap",
+        "deepstack",
+        "detrend", 
+        "ippqub:stdscience_ws",
+        "publishing", 
+        "replication", 
+        "update"
         );
+# current home dir of gpc1 and gpc2 
+my $ipphome1 = "/data/ippc64.1/ippitc";
+my $ipphome2 = "/data/ippc18.0/home/ippps2";
 
 ###########################################################################
@@ -90,8 +95,8 @@
 
     if ($telescope eq 'gpc1') {
-       $ipphome = "/data/ippc64.1/ippitc";
-    }
-    elsif ($telescope eq 'gpc2') {
-       $ipphome = "/data/ippc18.0/home/ippps2";
+       $ipphome = $ipphome1;
+    }
+    elsif ($telescope eq 'gpc2') {
+       $ipphome = $ipphome2;
     }
     else {
@@ -134,8 +139,8 @@
 
     if ($telescope eq 'gpc1') {
-       $ipphome = "/data/ippc64.1/ippitc";
-    }
-    elsif ($telescope eq 'gpc2') {
-       $ipphome = "/data/ippc18.0/home/ippps2";
+       $ipphome = $ipphome1;
+    }
+    elsif ($telescope eq 'gpc2') {
+       $ipphome = $ipphome2;
     }
     else {
@@ -177,8 +182,8 @@
 
     if ($telescope eq 'gpc1') {
-       $ipphome = "/data/ippc64.1/ippitc";
-    }
-    elsif ($telescope eq 'gpc2') {
-       $ipphome = "/data/ippc18.0/home/ippps2";
+       $ipphome = $ipphome1;
+    }
+    elsif ($telescope eq 'gpc2') {
+       $ipphome = $ipphome2;
     }
     else {
@@ -209,8 +214,8 @@
     my $ipphome;
     if ($telescope eq 'gpc1') {
-       $ipphome = "/data/ippc64.1/ippitc";
-    }
-    elsif ($telescope eq 'gpc2') {
-       $ipphome = "/data/ippc18.0/home/ippps2";
+       $ipphome = $ipphome1;
+    }
+    elsif ($telescope eq 'gpc2') {
+       $ipphome = $ipphome2;
     }
     else {
@@ -239,8 +244,8 @@
     my $ipphome;
     if ($telescope eq 'gpc1') {
-       $ipphome = "/data/ippc64.1/ippitc";
-    }
-    elsif ($telescope eq 'gpc2') {
-       $ipphome = "/data/ippc18.0/home/ippps2";
+       $ipphome = $ipphome1;
+    }
+    elsif ($telescope eq 'gpc2') {
+       $ipphome = $ipphome2;
     }
     else {
@@ -279,8 +284,8 @@
 
     if ($telescope eq 'gpc1') {
-       $ipphome = "/data/ippc64.1/ippitc";
-    }
-    elsif ($telescope eq 'gpc2') {
-       $ipphome = "/data/ippc18.0/home/ippps2";
+       $ipphome = $ipphome1;
+    }
+    elsif ($telescope eq 'gpc2') {
+       $ipphome = $ipphome2;
     }
     else {