I noticed that OTRS autoresponses don't include a "Precedence: bulk" 
header, even though the code tries to set one.

This is because MIME::Entity doesn't consider "Precedence" a standard 
header for some reason (at least not in my vbersion 5.404), so it ignores 
it.

This patch fixes it:

*** SendArticle.pm.orig Sun Nov 30 22:09:41 2003
--- SendArticle.pm      Sun Nov 30 22:11:50 2003
***************
*** 109,115 ****
          Encoding => '8bit',
      }; 
      if ($Loop) {
!         $$Header{Precedence} = 'bulk';
          $$Header{'X-Loop'} = 'bulk';
      }
      my $Entity = MIME::Entity->build(%{$Header}, Data => $Param{Body});
--- 109,118 ----
          Encoding => '8bit',
      }; 
      if ($Loop) {
!         # the "Precedence" header isn't one of the standard MIME::Entity
!         # headers, so it needs a trailing semicolon. See MIME::Entity
!         # docs for "build".
!         $$Header{'Precedence:'} = 'bulk';
          $$Header{'X-Loop'} = 'bulk';
      }
      my $Entity = MIME::Entity->build(%{$Header}, Data => $Param{Body});


Hope this helps.

-- 
Robert L Mathews, Tiger Technologies      http://www.tigertech.net/

"I am not able rightly to apprehend the kind of confusion of
 ideas that could provoke such a question."  -- Charles Babbage

_______________________________________________
OTRS mailing list: dev - Webpage: http://otrs.org/
Archive: http://lists.otrs.org/pipermail/dev
To unsubscribe: http://lists.otrs.org/cgi-bin/listinfo/dev

Reply via email to