Changeset 1563


Ignore:
Timestamp:
May 22, 2012, 10:16:51 AM (7 years ago)
Author:
bruno
Message:
  • Fix an error with pontential undef fields
File:
1 edited

Legend:

Unmodified
Added
Removed
  • projects/CDDBeditor/devel/CDDBeditor/bin/CDDBeditor

    r1175 r1563  
    311311        $tno = $entry->{tno} if (defined $entry->{tno});
    312312        $title = $entry->{title} if (defined $entry->{title});
    313         push @vradio,sprintf "%02d (%s - %d tracks) - %s",$ind,$cat,$tno,$title;
     313        my $chain = undef;
     314        $chain = sprintf("%02d (%s - %d tracks) - %s",$ind,$cat,$tno,$title) if ((defined $cat) && (defined $tno) && (defined $title));
     315        push @vradio,$chain if (defined $chain);
    314316        $ind++;
    315317    }
Note: See TracChangeset for help on using the changeset viewer.