Checkbox for slug exclusion does not work on "Slugs updated and redirects created" Event after save

[m41r]

How to reproduce:

• on a page with child pages, set checkbox "exclude_slug_for_subpages".
• press "recalculate URL Slug" button.
• save page -> the modal box appears "Slugs updated and redirects created".

Expected behavior:

the excluded slug should not appear on any children of that page.

Actual behavior:

the slug of all children are generated as the same way as without the checkbox set.

System:

TYPO3 CMS 10.4.8
masi 1.1.0

[dmitryd]

I think the problem is in TYPO3. TYPO3\CMS\Redirects\Service\SlugService::updateSlug() directly manipulates the slug and completely ignores any modifiers that slug field has:

    protected function updateSlug(array $subPageRecord, string $oldSlugOfParentPage, string $newSlugOfParentPage): ?string
    {
        if (strpos($subPageRecord['slug'], $oldSlugOfParentPage) !== 0) {
            return null;
        }

        $newSlug = rtrim($newSlugOfParentPage, '/') . '/'
            . substr($subPageRecord['slug'], strlen(rtrim($oldSlugOfParentPage, '/') . '/'));
        $state = RecordStateFactory::forName('pages')
            ->fromArray($subPageRecord, $subPageRecord['pid'], $subPageRecord['uid']);
        $fieldConfig = $GLOBALS['TCA']['pages']['columns']['slug']['config'] ?? [];
        $slugHelper = GeneralUtility::makeInstance(SlugHelper::class, 'pages', 'slug', $fieldConfig);

        if (!$slugHelper->isUniqueInSite($newSlug, $state)) {
            $newSlug = $slugHelper->buildSlugForUniqueInSite($newSlug, $state);
        }

        $this->persistNewSlug((int)$subPageRecord['uid'], $newSlug);
        return $newSlug;
    }

The right thing here would be to fix TYPO3 to call slug modifiers.

[dmitryd]

Added: https://forge.typo3.org/issues/96928