diff options
Diffstat (limited to 'helpcontent2/helpers/update_tree.pl')
| -rw-r--r-- | helpcontent2/helpers/update_tree.pl | 12 |
1 files changed, 2 insertions, 10 deletions
diff --git a/helpcontent2/helpers/update_tree.pl b/helpcontent2/helpers/update_tree.pl index 018d55c053..b2aa53fcb3 100644 --- a/helpcontent2/helpers/update_tree.pl +++ b/helpcontent2/helpers/update_tree.pl @@ -34,10 +34,6 @@ use File::Copy qw/cp mv/; use File::Basename; use Benchmark; -my $is_win = "false"; - -$is_win = "true" , if ( defined $ENV{USE_SHELL} && $ENV{USE_SHELL} eq "4nt" ); - $t0 = new Benchmark; # update the tree files in <platform>/misc/* @@ -79,9 +75,7 @@ if ( ! defined $prj ) { { $source_dir = $ENV{LOCALIZESDF}; } - if( $is_win eq "false" ) { $source_dir =~ s/\/auxiliary\/localize.sdf$// ; } - else { $source_dir =~ s/\\auxiliary\\localize.sdf$// ; } - + $source_dir =~ s/\/auxiliary\/localize.sdf$// ; } #else {die "ERROR: The env variables TRYSDF LOCALIZATION_FOUND LOCALIZESDF not found ... something is wrong!\n";} @@ -102,8 +96,7 @@ if ( ! defined $prj ) { { $source_dir = $ENV{LOCALIZESDF}; } - if( $is_win eq "false" ) { $source_dir =~ s/\/auxiliary\/localize.sdf$// ; } - else { $source_dir =~ s/\\auxiliary\\localize.sdf$// ; } + $source_dir =~ s/\/auxiliary\/localize.sdf$// ; #else {die "ERROR: The env variables TRYSDF LOCALIZATION_FOUND LOCALIZESDF not found ... something is wrong!\n";} } @@ -343,7 +336,6 @@ sub read_loc { print "\n\nReading localized titles..."; $/ = "\n"; my $path = "$source_dir/text"; - $path =~ s/\//\\/g , if $is_win eq "true"; print " in $source_dir/text\n"; @files = `find $source_dir/text -name localize.sdf`; for my $fname (@files) { |