Changeset 1072 for trunk/bin/syncqt
- Timestamp:
- Sep 10, 2011, 12:55:12 AM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/bin/syncqt
r846 r1072 342 342 343 343 ###################################################################### 344 # Syntax: fixPaths(file, dir )344 # Syntax: fixPaths(file, dir) 345 345 # Params: file, string, filepath to be made relative to dir 346 346 # dir, string, dirpath for point of origin 347 348 347 349 # 348 350 # Purpose: file is made relative (if possible) of dir. … … 350 352 ###################################################################### 351 353 sub fixPaths { 352 my ($file, $dir ) = @_;353 $dir =~ s=^$basedir/=$out_basedir/= if(! ($basedir eq $out_basedir));354 my ($file, $dir) = @_; 355 $dir =~ s=^$basedir/=$out_basedir/= if(!($basedir eq $out_basedir)); 354 356 $file =~ s=\\=/=g; 355 357 $file =~ s/\+/\\+/g; … … 890 892 #deal with the install directives 891 893 if($public_header) { 892 my $pri_install_iheader = fixPaths($iheader, $current_dir );894 my $pri_install_iheader = fixPaths($iheader, $current_dir); 893 895 foreach my $class (@classes) { 894 896 # Strip namespaces: … … 898 900 # } 899 901 my $class_header = fixPaths("$out_basedir/include/$lib/$class", 900 $current_dir ) . " ";902 $current_dir) . " "; 901 903 $pri_install_classes .= $class_header 902 904 unless($pri_install_classes =~ $class_header); … … 906 908 } 907 909 else { 908 my $pri_install_iheader = fixPaths($iheader, $current_dir );910 my $pri_install_iheader = fixPaths($iheader, $current_dir); 909 911 $pri_install_pfiles.= "$pri_install_iheader ";; 910 912 }
Note:
See TracChangeset
for help on using the changeset viewer.