Changeset 1170 in ProjectBuilder


Ignore:
Timestamp:
Jan 30, 2011, 9:41:10 PM (10 years ago)
Author:
Bruno Cornec
Message:
  • Fix some remaining issues with multi CD support
File:
1 edited

Legend:

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

    r1169 r1170  
    143143
    144144Newt::Init();
    145 my ($ce_sl, $ce_sh) = Newt::GetScreenSize();
    146145
    147146# String definitions
     
    203202
    204203my $flag = NEWT_ENTRY_SCROLL;
     204my ($ce_sl, $ce_sh) = Newt::GetScreenSize();
    205205# Need 23 char for track and time
    206206my $width = $ce_sl - 23;
     
    297297        @cecd = get_cddb(\%ce_config);
    298298        # by default use first one
    299         $ce_cd = @cecd[0] if (defined @cecd[0]);
     299        $ce_cd = $cecd[0] if (defined $cecd[0]);
    300300    }
    301301    $firsttime = 0;
     
    304304    my $ind = 0;
    305305    foreach my $entry (@cecd) {
    306         push @vradio,sprintf "%02d (%s - %d tracks) - %s",$ind,$entry->{cat},$entry->{tno},$entry->{title};
     306        my $cat = "";
     307        my $tno = "";
     308        my $title = "";
     309        $cat = $entry->{cat} if (defined $entry->{cat});
     310        $tno = $entry->{tno} if (defined $entry->{tno});
     311        $title = $entry->{title} if (defined $entry->{title});
     312        push @vradio,sprintf "%02d (%s - %d tracks) - %s",$ind,$cat,$tno,$title;
    307313        $ind++;
    308314    }
     
    338344    }
    339345    # Point now to the right CD
    340     $ce_cd = @cecd[$ind-1];
     346    $ce_cd = $cecd[$ind-1];
    341347
    342348    if (not defined $ce_cd->{title}) {
     
    421427   
    422428    # Build interface
     429    ($ce_sl, $ce_sh) = Newt::GetScreenSize();
    423430    $ce_panel = Newt::Panel(4, $ce_sh, "CDDB Info");
    424431    $flage = NEWT_ANCHOR_RIGHT;
Note: See TracChangeset for help on using the changeset viewer.