- Timestamp:
- 2013-10-30T20:54:49+13:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/plugins/MediaWikiPlugin.pm
r19123 r28560 35 35 use HTMLPlugin; 36 36 use unicode; 37 use util; 38 use FileUtils; 37 39 38 40 use strict; # every perl program should have this! … … 218 220 $css_files[$css_file_count++] = $2 if defined $2; 219 221 } 222 223 # Set the env for wget once, outside the for loop 224 # the wget binary is dependent on the gnomelib_env (particularly lib/libiconv2.dylib) being set, particularly on Mac Lions (android too?) 225 &util::set_gnomelib_env(); # this will set the gnomelib env once for each subshell launched, by first checking if GEXTGNOME is not already set 220 226 221 227 # download the stylesheets if we haven't downloaded them yet … … 238 244 $css_file =~ s/\?(.+)$//isg; 239 245 240 my $css_file_path = & util::filename_cat($base_dir, $css_file);246 my $css_file_path = &FileUtils::filenameConcatenate($base_dir, $css_file); 241 247 242 248 # do nothing if we have already downloaded the css files … … 251 257 mkdir($path_check) if (! -d $path_check ); 252 258 } 253 259 254 260 # NOTE: wget needs configuration to directly access Internet 255 261 # These files should already downloaded if we used the MediaWikiDownload … … 293 299 $style_dir =~ s/import$/style/; 294 300 $css_file =~ m/(.*)\/(.*)$/; 295 $style_dir = & util::filename_cat($style_dir, $2);301 $style_dir = &FileUtils::filenameConcatenate($style_dir, $2); 296 302 297 303 if(open(OUTPUT, ">$style_dir")){ … … 477 483 my $macro_path = $base_dir; 478 484 $macro_path =~ s/import$/macros/; 479 my $extradm_file = & util::filename_cat($macro_path, "extra.dm");485 my $extradm_file = &FileUtils::filenameConcatenate($macro_path, "extra.dm"); 480 486 481 487 my $extra_dm = ""; … … 644 650 my $self = shift(@_); 645 651 646 my $about_macro_file = & util::filename_cat($ENV{'GSDLHOME'}, "macros", "about.dm");652 my $about_macro_file = &FileUtils::filenameConcatenate($ENV{'GSDLHOME'}, "macros", "about.dm"); 647 653 my $about_page_content = ""; 648 654 if (open(INPUT, "<$about_macro_file")){
Note:
See TracChangeset
for help on using the changeset viewer.