OLD | NEW |
1 #!/usr/bin/perl -w | 1 #!/usr/bin/perl -w |
| 2 # Copyright (c) 2012 The Chromium Authors. All rights reserved. |
| 3 # Use of this source code is governed by a BSD-style license that can be |
| 4 # found in the LICENSE file. |
| 5 # |
| 6 # Technically, it's a third party. |
| 7 # |
2 # Copyright 2008, Google Inc. | 8 # Copyright 2008, Google Inc. |
3 # All rights reserved. | 9 # All rights reserved. |
4 # | 10 # |
5 # Redistribution and use in source and binary forms, with or without | 11 # Redistribution and use in source and binary forms, with or without |
6 # modification, are permitted provided that the following conditions are | 12 # modification, are permitted provided that the following conditions are |
7 # met: | 13 # met: |
8 # | 14 # |
9 # * Redistributions of source code must retain the above copyright | 15 # * Redistributions of source code must retain the above copyright |
10 # notice, this list of conditions and the following disclaimer. | 16 # notice, this list of conditions and the following disclaimer. |
11 # * Redistributions in binary form must reproduce the above | 17 # * Redistributions in binary form must reproduce the above |
(...skipping 249 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
261 $query_description = get_query_description($parameter); | 267 $query_description = get_query_description($parameter); |
262 | 268 |
263 open OUT, "> $infile" or die "Failed to open file $infile"; | 269 open OUT, "> $infile" or die "Failed to open file $infile"; |
264 print OUT "This tests loading of a $query_description when the HTTP content-
type". | 270 print OUT "This tests loading of a $query_description when the HTTP content-
type". |
265 " is set to \"$content_type\" .\n Expected : This page should have ". | 271 " is set to \"$content_type\" .\n Expected : This page should have ". |
266 "$current_expected .\n\n"; | 272 "$current_expected .\n\n"; |
267 print OUT "<script>\n window.location=\"$source\";\n</script>\n"; | 273 print OUT "<script>\n window.location=\"$source\";\n</script>\n"; |
268 close OUT; | 274 close OUT; |
269 } | 275 } |
270 } | 276 } |
OLD | NEW |