#i10000# fix image/resource mess

2 files changed, 8 insertions, 8 deletions

diff --git a/solenv/bin/deliver.pl b/solenv/bin/deliver.pl
index b15625f3c0de..8dc89cce6c84 100755
--- a/solenv/bin/deliver.pl
+++ b/solenv/bin/deliver.pl
@@ -5,9 +5,9 @@ eval 'exec perl -wS $0 ${1+"$@"}'
 #
 #   $RCSfile: deliver.pl,v $
 #
-#   $Revision: 1.69 $
+#   $Revision: 1.70 $
 #
-#   last change: $Author: hjs $ $Date: 2004-06-07 13:41:41 $
+#   last change: $Author: hjs $ $Date: 2004-06-08 16:38:00 $
 #
 #   The Contents of this file are made available subject to the terms of
 #   either of the following licenses
@@ -78,7 +78,7 @@ use File::Spec;
 
 ( $script_name = $0 ) =~ s/^.*\b(\w+)\.pl$/$1/;
 
-$id_str = ' $Revision: 1.69 $ ';
+$id_str = ' $Revision: 1.70 $ ';
 $id_str =~ /Revision:\s+(\S+)\s+\$/
   ? ($script_rev = $1) : ($script_rev = "-");
 
@@ -111,7 +111,7 @@ $module             = 0;            # module name
 $base_dir           = 0;            # path to module base directory
 $dlst_file          = 0;            # path to d.lst
 @ilst_file          = ();           # array of pathes to image lists
-$ilst_ext           = 'ilst2';      # extension of image lists
+$ilst_ext           = 'ilst';      # extension of image lists
 $umask              = 22;           # default file/directory creation mask
 $dest               = 0;            # optional destination path
 $common_build       = 0;            # do we have common trees?
diff --git a/solenv/bin/packimages.pl b/solenv/bin/packimages.pl
index 1acb72ae133d..79503d2ba943 100755
--- a/solenv/bin/packimages.pl
+++ b/solenv/bin/packimages.pl
@@ -5,9 +5,9 @@ eval 'exec perl -wS $0 ${1+"$@"}'
 #
 #   $RCSfile: packimages.pl,v $
 #
-#   $Revision: 1.4 $
+#   $Revision: 1.5 $
 #
-#   last change: $Author: hjs $ $Date: 2004-06-07 13:41:42 $
+#   last change: $Author: hjs $ $Date: 2004-06-08 16:38:00 $
 #
 #   The Contents of this file are made available subject to the terms of
 #   either of the following licenses
@@ -91,7 +91,7 @@ my $extra_verbose;           # be extra verbose
 ( my $script_name = $0 ) =~ s/^.*\b(\w+)\.pl$/$1/;
 
 my $script_rev;
-my $id_str = ' $Revision: 1.4 $ ';
+my $id_str = ' $Revision: 1.5 $ ';
 $id_str =~ /Revision:\s+(\S+)\s+\$/
   ? ($script_rev = $1) : ($script_rev = "-");
 
@@ -148,7 +148,7 @@ sub parse_options
 
 sub get_image_lists
 {
-    my @image_lists = glob("$imagelist_path/*.ilst2");
+    my @image_lists = glob("$imagelist_path/*.ilst");
 
     if ( !@image_lists ) {
         print_error("can't find any image lists in '$imagelist_path'", 3);