--- config/install.pl.orig	Sun Apr 28 07:15:01 2002
+++ config/install.pl	Sat Jan 25 17:30:30 2003
@@ -372,7 +372,7 @@
 
 if($cfg{TEXPATH}) {
   print "\nNote: trying to install LaTeX2HTML style files in TeX directory tree\n     ($cfg{TEXPATH})\n";
-  unless(mkpath($cfg{TEXPATH})) {
+  unless(mkpath(($ENV{DESTDIR} || '').$cfg{TEXPATH})) {
   #my $testpath = $cfg{TEXPATH}; # to strip (latex2)html
   #$testpath =~ s/[$dd$dd][^$dd$dd]*$//;
   #if((-d $cfg{TEXPATH} && !-w _) || (-d $testpath && !-w _)) {
--- config/config.pl.orig	Sat Sep 28 07:15:01 2002
+++ config/config.pl	Sat Jan 25 17:35:32 2003
@@ -1276,6 +1276,7 @@
     my $vers = '';
     $msg = $msg || $err;
     if ($msg =~ /(^|\s*)Version.*\s([\d\.]+)\s*([\n\r]|$)/is) { $vers = $2; }
+    $vers =~ s|^(\d+\.\d+)\..*$|$1|s;
     if ($vers =~ /^199/) {
 	# try left crop
 	&checking('if pnmcrop can crop from one direction');
