Index: trunk/ippScripts/scripts/register_imfile.pl
===================================================================
--- trunk/ippScripts/scripts/register_imfile.pl	(revision 30636)
+++ trunk/ippScripts/scripts/register_imfile.pl	(revision 30639)
@@ -199,4 +199,8 @@
     $command .= " -data_state full";
 }
+elsif (is_ccim($tmp_exp_name,$exp_type)) {
+    printf STDERR "This is a camera commanded detrend exposure that should not cause a burn.\n";
+    $command .= " -data_state full";
+}    
 else {
     printf STDERR "Need to check burntool.\n";
@@ -380,4 +384,20 @@
 }
 
+sub is_ccim 
+{
+    my $exp_name = shift;
+    my $exp_type = shift;
+ 
+    # needs to match regtool.c checks for "is_ccim".
+    if ($exp_name =~ /c/) {
+	if (($exp_type eq 'DOMEFLAT')||
+	    ($exp_type eq 'DARK')||
+	    ($exp_type eq 'BIAS')) {
+	    return(1);
+	}
+    }
+    return(0);
+}
+
 sub is_daytime
 {