From: Frank Lichtenheld <frank@lichtenheld.de>
Date: Tue, 5 Aug 2008 22:52:20 +0000 (-0300)
Subject: Packages::Dispatcher: Send Vary: HTTP header
X-Git-Url: https://git.deb.at/?a=commitdiff_plain;h=013d90de12d542d43b2afa871539b795ee17914f;p=deb%2Fpackages.git

Packages::Dispatcher: Send Vary: HTTP header
---

diff --git a/lib/Packages/Dispatcher.pm b/lib/Packages/Dispatcher.pm
index c250011..986b12a 100755
--- a/lib/Packages/Dispatcher.pm
+++ b/lib/Packages/Dispatcher.pm
@@ -342,6 +342,7 @@ sub do_dispatch {
     unless (@Packages::CGI::fatal_errors) {
 	print $input->header(-charset => $charset,
 			     -type => get_mime($opts{format}),
+			     -vary => 'negotiate,accept-language',
 			     -last_modified => strftime("%a, %d %b %Y %T %z",
 							localtime($Packages::DB::db_read_time)),
 			     );