--- amavisd.orig	Tue Nov  6 11:00:36 2007
+++ amavisd	Tue Nov  6 11:02:53 2007
@@ -9690,6 +9690,9 @@
       if c('remove_existing_x_scanned_headers') &&
          (c('X_HEADER_LINE') ne '' && c('X_HEADER_TAG') =~ /^[!-9;-\176]+\z/);
   }
+  # add x-languages header if TextCat supplies one
+  my($lang) = $msginfo->supplementary_info('LANGUAGES');
+  $hdr_edits->add_header('X-Languages', $lang) if ($lang);
   if ($extra_code_antispam) {
     if (c('remove_existing_spam_headers')) {
       my(@which_headers) = qw(
@@ -19842,6 +19845,7 @@
 #[? %#T ||, Tests: \[[%T|,]\]]#
 #[:supplementary_info|SCTYPE|, shortcircuit=%%s]#
 #[:supplementary_info|AUTOLEARN|, autolearn=%%s]#
+[? [:supplementary_info|LANGUAGES] ||, languages=[:uquote|[:supplementary_info|LANGUAGES]]]#
 , %y ms#
 ]
 [?%#O|#|Blocked #
@@ -19863,6 +19867,7 @@
 #[? %#T ||, Tests: \[[%T|,]\]]#
 #[:supplementary_info|SCTYPE|, shortcircuit=%%s]#
 #[:supplementary_info|AUTOLEARN|, autolearn=%%s]#
+[? [:supplementary_info|LANGUAGES] ||, languages=[:uquote|[:supplementary_info|LANGUAGES]]]#
 , %y ms#
 ]
 __DATA__