409,411c409,411
<     my @levelsets = sort(all($FBLEVELS));
<     $displaying_dialog eq 'ls_delete' and @levelsets = difference2(\@levelsets, [ 'default-levelset' ]);
<     return @levelsets;
---
>     my @levelsets = map { $_ =~ s{^.*/(.*)$}{$1}; $_; } sort(glob("$FBLEVELS/*"));
>     $displaying_dialog eq 'ls_delete' and @levelsets = difference2(\@levelsets,['default-levelset']);
>     return @levelsets;