2 # Delete a bunch of profiles
4 require './burner-lib.pl';
6 &error_setup($text{'delete_err'});
7 @d = split(/\0/, $in{'d'});
8 @d || &error($text{'delete_enone'});
12 $profile = &get_profile($d);
13 &can_use_profile($profile) || &error($text{'edit_ecannot'});
14 &delete_profile($profile);