Index: trunk/tools/make_burntool_pcontrol.pl
===================================================================
--- trunk/tools/make_burntool_pcontrol.pl	(revision 26670)
+++ trunk/tools/make_burntool_pcontrol.pl	(revision 27032)
@@ -144,5 +144,5 @@
 	($date,$time) = split / /, $dateobs;
 	($year,$month,$day) = split /-/, $date;
-	($hour,$minute,$second) = split /:/, $time;
+	($hour,$minute,$second) = split /:/, $time;   #/ I hope emacs fixes this bug soon. ;
 	
 	$dt = DateTime->new( year   => $year, month  => $month, day    => $day,
@@ -161,9 +161,10 @@
 	if ((($science{$obs_mode} == 1)&&($comment !~ /Daytime/))||
 	    (($science{$obs_mode} == 0)&&(
-					  ($comment =~ /MD/)||($comment =~ /ThreePi/)||
-					  ($comment =~ /STS/)||($comment =~ /M31/)||
-					  ($comment =~ /CAL/i)||($comment =~ /SS/)||($comment =~ /SVS/)||
-					  ($comment =~ /Sweetspot/)||($comment =~ /virgo/i)||($comment =~ /kepler/)||
-					  ($comment =~ /sdss/))))					  
+		 ($comment =~ /MD/)||($comment =~ /ThreePi/)||
+		 ($comment =~ /STS/i)||($comment =~ /M31/)||
+		 ($comment =~ /CAL/i)||($comment =~ /SS/)||($comment =~ /SVS/)||
+		 ($comment =~ /Stellar Transit/)||
+		 ($comment =~ /Sweetspot/)||($comment =~ /virgo/i)||($comment =~ /kepler/)||
+		 ($comment =~ /sdss/))))					  
 	{
 	    if ($start_s[-1] == 0) {