| … | |
… | |
| 63 | cf::get_slot 0.01, -10, "music scheduler"; |
63 | cf::get_slot 0.01, -10, "music scheduler"; |
| 64 | |
64 | |
| 65 | my $pl = cf::player::find_active $_ or next; |
65 | my $pl = cf::player::find_active $_ or next; |
| 66 | my $ob = $pl->ob; |
66 | my $ob = $pl->ob; |
| 67 | my $ns = $pl->ns or next; |
67 | my $ns = $pl->ns or next; |
| 68 | $ns->extcmd or next; |
|
|
| 69 | my $map = $ob->map; |
68 | my $map = $ob->map; |
| 70 | my $rgn = $ob->region; |
69 | my $rgn = $ob->region; |
| 71 | |
70 | |
| 72 | my $id = join "\x00", $map->path, $rgn->name; |
71 | my $id = join "\x00", $map->path, $rgn->name; |
| 73 | |
72 | |
