Type Alias RemoveSuffix<Original, Suffixes>

RemoveSuffix: Suffixes extends readonly [
    infer First extends string,
    ...(infer Rest extends string[]),
]
    ? Original extends `${infer Prefix}-${First}`
        ? Prefix
        : RemoveSuffix<Original, Rest>
    : Original

Removes a tuple of suffixes from a string. Note that the suffix removal happens in order, so place your longest suffixes first.