diff options
-rwxr-xr-x | graveyard/rhautoimport-ab | 4 | ||||
-rwxr-xr-x | graveyard/rhautoimport-fb | 2 | ||||
-rwxr-xr-x | rhautoimport-ba | 4 | ||||
-rwxr-xr-x | rhautoimport-cb | 4 | ||||
-rwxr-xr-x | rhautoimport-dm | 4 | ||||
-rwxr-xr-x | rhautoimport-dv | 2 | ||||
-rwxr-xr-x | rhautoimport-ek | 2 | ||||
-rwxr-xr-x | rhautoimport-gd | 4 | ||||
-rwxr-xr-x | rhautoimport-po | 4 | ||||
-rwxr-xr-x | rhautoimport-ra | 4 | ||||
-rwxr-xr-x | rhautoimport-tr | 2 | ||||
-rwxr-xr-x | rhautoimport-wr | 2 | ||||
-rwxr-xr-x | test/cba-inspect | 6 |
13 files changed, 22 insertions, 22 deletions
diff --git a/graveyard/rhautoimport-ab b/graveyard/rhautoimport-ab index 3a2e25f..e420301 100755 --- a/graveyard/rhautoimport-ab +++ b/graveyard/rhautoimport-ab @@ -128,10 +128,10 @@ for my $entry ($feed->entries) { $i++; next unless $entry->enclosure; - my $entry_bdt = $entry->{'entry'}{'https://cba.fro.at/help#feeds'}{'broadcastDate'}; + my $entry_bdt = $entry->{'entry'}{'http://cba.fro.at/help#feeds'}{'broadcastDate'}; my $format_string = "%a, %d %b %Y %H:%M:%S"; unless (defined $entry_bdt) { - $entry_bdt = $entry->{'entry'}{'https://cba.fro.at/help#feeds'}{'productionDate'}; + $entry_bdt = $entry->{'entry'}{'http://cba.fro.at/help#feeds'}{'productionDate'}; $format_string = "%a, %d %b %Y"; } next unless (defined $entry_bdt); diff --git a/graveyard/rhautoimport-fb b/graveyard/rhautoimport-fb index 917ddf5..0dfbdbb 100755 --- a/graveyard/rhautoimport-fb +++ b/graveyard/rhautoimport-fb @@ -128,7 +128,7 @@ for my $entry ($feed->entries) { $i++; next unless $entry->enclosure; - my $entry_bdt = $entry->{'entry'}{'https://cba.fro.at/help#feeds'}{'broadcastDate'}; + my $entry_bdt = $entry->{'entry'}{'http://cba.fro.at/help#feeds'}{'broadcastDate'}; next unless (defined $entry_bdt); my $bdt = DateTime::Format::Strptime::strptime("%a, %d %b %Y %H:%M:%S", $entry_bdt); diff --git a/rhautoimport-ba b/rhautoimport-ba index 6744ff8..045a9f6 100755 --- a/rhautoimport-ba +++ b/rhautoimport-ba @@ -128,10 +128,10 @@ for my $entry ($feed->entries) { $i++; next unless $entry->enclosure; - my $entry_bdt = $entry->{'entry'}{'https://cba.fro.at/help#feeds'}{'broadcastDate'}; + my $entry_bdt = $entry->{'entry'}{'http://cba.fro.at/help#feeds'}{'broadcastDate'}; my $format_string = "%a, %d %b %Y %H:%M:%S"; unless (defined $entry_bdt) { - $entry_bdt = $entry->{'entry'}{'https://cba.fro.at/help#feeds'}{'productionDate'}; + $entry_bdt = $entry->{'entry'}{'http://cba.fro.at/help#feeds'}{'productionDate'}; $format_string = "%a, %d %b %Y"; } next unless (defined $entry_bdt); diff --git a/rhautoimport-cb b/rhautoimport-cb index 8063ce4..e2eb494 100755 --- a/rhautoimport-cb +++ b/rhautoimport-cb @@ -124,10 +124,10 @@ for my $entry ($feed->entries) { $i++; next unless $entry->enclosure; - my $entry_bdt = $entry->{'entry'}{'https://cba.fro.at/help#feeds'}{'broadcastDate'}; + my $entry_bdt = $entry->{'entry'}{'http://cba.fro.at/help#feeds'}{'broadcastDate'}; my $format_string = "%a, %d %b %Y %H:%M:%S"; unless (defined $entry_bdt) { - $entry_bdt = $entry->{'entry'}{'https://cba.fro.at/help#feeds'}{'productionDate'}; + $entry_bdt = $entry->{'entry'}{'http://cba.fro.at/help#feeds'}{'productionDate'}; $format_string = "%a, %d %b %Y"; } next unless (defined $entry_bdt); diff --git a/rhautoimport-dm b/rhautoimport-dm index 394c301..3a3f9ef 100755 --- a/rhautoimport-dm +++ b/rhautoimport-dm @@ -128,10 +128,10 @@ for my $entry ($feed->entries) { $i++; next unless $entry->enclosure; - my $entry_bdt = $entry->{'entry'}{'https://cba.fro.at/help#feeds'}{'broadcastDate'}; + my $entry_bdt = $entry->{'entry'}{'http://cba.fro.at/help#feeds'}{'broadcastDate'}; my $format_string = "%a, %d %b %Y %H:%M:%S"; unless (defined $entry_bdt) { - $entry_bdt = $entry->{'entry'}{'https://cba.fro.at/help#feeds'}{'productionDate'}; + $entry_bdt = $entry->{'entry'}{'http://cba.fro.at/help#feeds'}{'productionDate'}; $format_string = "%a, %d %b %Y"; } next unless (defined $entry_bdt); diff --git a/rhautoimport-dv b/rhautoimport-dv index bdaec42..671cb4b 100755 --- a/rhautoimport-dv +++ b/rhautoimport-dv @@ -139,7 +139,7 @@ for my $entry ($feed->entries) { $i++; next unless $entry->enclosure; - my $entry_bdt = $entry->{'entry'}{'https://cba.fro.at/help#feeds'}{'broadcastDate'}; + my $entry_bdt = $entry->{'entry'}{'http://cba.fro.at/help#feeds'}{'broadcastDate'}; next unless (defined $entry_bdt); my $bdt = DateTime::Format::Strptime::strptime("%a, %d %b %Y %H:%M:%S", $entry_bdt); diff --git a/rhautoimport-ek b/rhautoimport-ek index 5302b23..854be1e 100755 --- a/rhautoimport-ek +++ b/rhautoimport-ek @@ -134,7 +134,7 @@ for my $entry ($feed->entries) { $i++; next unless $entry->enclosure; - my $entry_bdt = $entry->{'entry'}{'https://cba.fro.at/help#feeds'}{'broadcastDate'}; + my $entry_bdt = $entry->{'entry'}{'http://cba.fro.at/help#feeds'}{'broadcastDate'}; next unless (defined $entry_bdt); my $bdt = DateTime::Format::Strptime::strptime("%a, %d %b %Y %H:%M:%S", $entry_bdt); diff --git a/rhautoimport-gd b/rhautoimport-gd index 91295c4..d2b8424 100755 --- a/rhautoimport-gd +++ b/rhautoimport-gd @@ -110,10 +110,10 @@ for my $entry ($feed->entries) { $i++; next unless $entry->enclosure; - my $entry_bdt = $entry->{'entry'}{'https://cba.fro.at/help#feeds'}{'broadcastDate'}; + my $entry_bdt = $entry->{'entry'}{'http://cba.fro.at/help#feeds'}{'broadcastDate'}; my $format_string = "%a, %d %b %Y %H:%M:%S"; unless (defined $entry_bdt) { - $entry_bdt = $entry->{'entry'}{'https://cba.fro.at/help#feeds'}{'productionDate'}; + $entry_bdt = $entry->{'entry'}{'http://cba.fro.at/help#feeds'}{'productionDate'}; $format_string = "%a, %d %b %Y"; } next unless (defined $entry_bdt); diff --git a/rhautoimport-po b/rhautoimport-po index 49947fb..5014a8c 100755 --- a/rhautoimport-po +++ b/rhautoimport-po @@ -129,10 +129,10 @@ for my $entry ($feed->entries) { $i++; next unless $entry->enclosure; - my $entry_bdt = $entry->{'entry'}{'https://cba.fro.at/help#feeds'}{'broadcastDate'}; + my $entry_bdt = $entry->{'entry'}{'http://cba.fro.at/help#feeds'}{'broadcastDate'}; my $format_string = "%a, %d %b %Y %H:%M:%S"; unless (defined $entry_bdt) { - $entry_bdt = $entry->{'entry'}{'https://cba.fro.at/help#feeds'}{'productionDate'}; + $entry_bdt = $entry->{'entry'}{'http://cba.fro.at/help#feeds'}{'productionDate'}; $format_string = "%a, %d %b %Y"; } next unless (defined $entry_bdt); diff --git a/rhautoimport-ra b/rhautoimport-ra index 371cb2f..6492d6b 100755 --- a/rhautoimport-ra +++ b/rhautoimport-ra @@ -109,10 +109,10 @@ for my $entry ($feed->entries) { $i++; next unless $entry->enclosure; - my $entry_bdt = $entry->{'entry'}{'https://cba.fro.at/help#feeds'}{'broadcastDate'}; + my $entry_bdt = $entry->{'entry'}{'http://cba.fro.at/help#feeds'}{'broadcastDate'}; my $format_string = "%a, %d %b %Y %H:%M:%S"; unless (defined $entry_bdt) { - $entry_bdt = $entry->{'entry'}{'https://cba.fro.at/help#feeds'}{'productionDate'}; + $entry_bdt = $entry->{'entry'}{'http://cba.fro.at/help#feeds'}{'productionDate'}; $format_string = "%a, %d %b %Y"; } next unless (defined $entry_bdt); diff --git a/rhautoimport-tr b/rhautoimport-tr index 541d2d7..58782de 100755 --- a/rhautoimport-tr +++ b/rhautoimport-tr @@ -105,7 +105,7 @@ for my $entry ($feed->entries) { $i++; next unless $entry->enclosure; - my $entry_bdt = $entry->{'entry'}{'https://cba.fro.at/help#feeds'}{'broadcastDate'}; + my $entry_bdt = $entry->{'entry'}{'http://cba.fro.at/help#feeds'}{'broadcastDate'}; next unless (defined $entry_bdt); my $bdt = DateTime::Format::Strptime::strptime("%a, %d %b %Y %H:%M:%S", $entry_bdt); diff --git a/rhautoimport-wr b/rhautoimport-wr index c9745af..e131c31 100755 --- a/rhautoimport-wr +++ b/rhautoimport-wr @@ -123,7 +123,7 @@ for my $entry ($feed->entries) { $i++; next unless $entry->enclosure; - my $entry_bdt = $entry->{'entry'}{'https://cba.fro.at/help#feeds'}{'broadcastDate'}; + my $entry_bdt = $entry->{'entry'}{'http://cba.fro.at/help#feeds'}{'broadcastDate'}; next unless (defined $entry_bdt); my $bdt = DateTime::Format::Strptime::strptime("%a, %d %b %Y %H:%M:%S", $entry_bdt); diff --git a/test/cba-inspect b/test/cba-inspect index 48d0f35..c7f3d76 100755 --- a/test/cba-inspect +++ b/test/cba-inspect @@ -67,11 +67,11 @@ for my $entry ($feed->entries) { $sum_title = decode_entities($entry->title); $sum_text = decode_entities($entry->content->body); - my $production_date = $entry->{'entry'}{'https://cba.fro.at/help#feeds'}{'productionDate'}; + my $production_date = $entry->{'entry'}{'http://cba.fro.at/help#feeds'}{'productionDate'}; $production_date = '<unset>' unless (defined $production_date); - my $broadcast_date = $entry->{'entry'}{'https://cba.fro.at/help#feeds'}{'broadcastDate'}; + my $broadcast_date = $entry->{'entry'}{'http://cba.fro.at/help#feeds'}{'broadcastDate'}; $broadcast_date = '<unset>' unless (defined $broadcast_date); - my $contains_copyright = $entry->{'entry'}{'https://cba.fro.at/help#feeds'}{'containsCopyright'}; + my $contains_copyright = $entry->{'entry'}{'http://cba.fro.at/help#feeds'}{'containsCopyright'}; $contains_copyright = 'false' unless (defined $contains_copyright); print $sum_title . ":\n"; |