--- config/install.pl.orig
+++ config/install.pl
@@ -374,7 +374,9 @@ foreach $item (sort keys %Install_items)
 
 if($cfg{TEXPATH}) {
   print "\nNote: trying to install LaTeX2HTML style files in TeX directory tree\n     ($cfg{TEXPATH})\n";
-  unless(mkpath($cfg{TEXPATH})) {
+  my $destdir = $cfg{TEXPATH};
+  $destdir = $ENV{'DESTDIR'}.$destdir if($ENV{'DESTDIR'});
+  unless(mkpath($destdir)) {
   #my $testpath = $cfg{TEXPATH}; # to strip (latex2)html
   #$testpath =~ s/[$dd$dd][^$dd$dd]*$//;
   #if((-d $cfg{TEXPATH} && !-w _) || (-d $testpath && !-w _)) {