3 files changed, 12 insertions, 3 deletions
diff --git a/Build/source/texk/tex4htk/ChangeLog b/Build/source/texk/tex4htk/ChangeLog
index aecd7edf945..7baa5d31c13 100644
--- a/Build/source/texk/tex4htk/ChangeLog
+++ b/Build/source/texk/tex4htk/ChangeLog
@@ -1,3 +1,7 @@
+2013-01-08  Peter Breitenlohner  <peb@mppmu.mpg.de>
+
+	* t4ht.c, tex4ht.c: Drop set but unused variables.
+
 2012-11-19  Peter Breitenlohner  <peb@mppmu.mpg.de>
 
 	* Makefile.am: Avoid use of deprecated INCLUDES.
diff --git a/Build/source/texk/tex4htk/t4ht.c b/Build/source/texk/tex4htk/t4ht.c
index a5a3286a8ce..81aaa02ad08 100644
--- a/Build/source/texk/tex4htk/t4ht.c
+++ b/Build/source/texk/tex4htk/t4ht.c
@@ -2090,7 +2090,7 @@ int i, start_loc, end_loc, addr = 0;
 char rec_op, *ch;
 static struct files_rec *to_rec, *from_rec,
    *opened_files = (struct files_rec *) 0,
-   *p, *p1, *p2, *p3, *p4, *from_op, *to_op;
+   *p, *p1, *p2, *p3, *p4, *from_op;
 FILE *in_file, *out_file;
 BOOL write_on;
 
@@ -2251,7 +2251,7 @@ p->label = addr;
 
             
 if( rec_op == Until_op ){
-  for( to_op = p = to_rec->down;
+  for( p = to_rec->down;
            p != (struct files_rec*) 0;  p = p->down ){
     if( p->op == From_op ){ from_op = p; break; }
   }
diff --git a/Build/source/texk/tex4htk/tex4ht.c b/Build/source/texk/tex4htk/tex4ht.c
index e058c32eae8..45762597e69 100644
--- a/Build/source/texk/tex4htk/tex4ht.c
+++ b/Build/source/texk/tex4htk/tex4ht.c
@@ -6889,7 +6889,10 @@ struct visited_file_rec * visited_file =
                        (struct visited_file_rec *) 0;
 
 
-struct env_var_rec *tfm_dirs, *htf_dirs;
+#ifndef KPATHSEA
+struct env_var_rec *tfm_dirs;
+#endif
+struct env_var_rec *htf_dirs;
 
 
 
@@ -6948,7 +6951,9 @@ cur_cache_font = (struct cache_font_rec *) 0;
 
    missing_fonts = FALSE;
    
+#ifndef KPATHSEA
 tfm_dirs = get_env_var("TEX4HTTFM");
+#endif
 htf_dirs = get_env_var("TEX4HTHTF");