Index: trunk/ippScripts/scripts/lossy_compress_imfile.pl
===================================================================
--- trunk/ippScripts/scripts/lossy_compress_imfile.pl	(revision 27163)
+++ trunk/ippScripts/scripts/lossy_compress_imfile.pl	(revision 27164)
@@ -127,8 +127,11 @@
     &my_die("Couldn't find original file: $uri\n", $exp_id,$exp_name,$class_id,$uri,$PS_EXIT_SYS_ERROR)
 	unless($ipprc->file_exists($uri));
+    my $uriReal = $ipprc->file_resolve( $uri );
+    
     my $compUri = $uri . ".fz";
     unless($ipprc->file_exists($compUri)) {
 	&my_die("Couldn't find compressed version of the file: $compUri\n", 
 		$exp_id,$exp_name,$class_id,$uri,$PS_EXIT_SYS_ERROR);
+
 	# If that die is removed, this will compress things as well.
 	&my_die("Output compressed file already exists: $compUri\n", 
@@ -142,5 +145,6 @@
 	unless ($success) {
 	    $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
-	    &my_die("Unable to compress file: $uri -> $compUri: $error_code", $exp_id,$exp_name,$class_id,$uri, $PS_EXIT_SYS_ERROR);
+	    &my_die("Unable to compress file: $uri -> $compUri: $error_code", 
+		    $exp_id,$exp_name,$class_id,$uri, $PS_EXIT_SYS_ERROR);
 	}
     }
@@ -179,5 +183,5 @@
 	}
 	# remove original version
-#    $neb->delete($uri);
+    $neb->delete($compUri);
     }
     exit(0);