fix bab sub-title containing newlines

beavis69 · Dec 28, 2020 · 2e31589 · 2e31589
1 parent e38db3b
commit 2e31589
Showing 1 changed file with 5 additions and 2 deletions.
diff --git a/tv_grab_fr_telerama b/tv_grab_fr_telerama
@@ -287,6 +287,9 @@ along with this program.  If not, see <http://www.gnu.org/licenses/>.
 2.5 bug fix :
    * more casting see https://github.com/zubrick/tv_grab_fr_telerama/issues/32
 
+2.6 bug fix :
+   * fix bab sub-title containing newlines.
+
 =cut
 use XMLTV::Usage <<END
     $0: get French television listings in XMLTV format
@@ -310,7 +313,7 @@ use warnings;
 use strict;
 
 use utf8;
-use XMLTV::Version '$Id: tv_grab_fr_telerama,v 2.5 2020/12/09 17:00:00 zubrick Exp $ ';
+use XMLTV::Version '$Id: tv_grab_fr_telerama,v 2.6 2020/12/28 09:30:00 zubrick Exp $ ';
 #use XMLTV::Capabilities qw/baseline manualconfig cache/;
 use XMLTV::Capabilities qw/baseline manualconfig/;
 use XMLTV::Description 'France (telerama)';
@@ -1084,7 +1087,7 @@ sub grab_day_channel($$$$$$) {
 
     $prog{length} = str2time($line->{'horaire'}{'fin'}) - str2time($line->{'horaire'}{'debut'});
 
-    $prog{'sub-title'} = [ [ $line->{'soustitre'} ] ] if ($line->{'soustitre'});
+    $prog{'sub-title'} = [ [ $line->{'soustitre'} =~ s/\r|\n//gr ] ] if ($line->{'soustitre'});
 
     # get genretext from uri
     if (!$genretext && defined $line->{'url'}) {