\appendtoks
...
\doifelselist\currenthead\donothing
- {\definelist[\currenthead][\currentheadparent][\c!prefix=\v!no]}%
+ {\normalexpanded{\definelist[\currenthead][\currentheadparent][\c!prefix=\v!no]}}%
...
\to \everydefinehead
Wolfgang