Fix problem with some classeNames not beeing parsed

Author: garronej

src/bin/css_to_ts/classNames.ts

@@ -5,25 +5,27 @@ import { objectKeys } from "tsafe/objectKeys";
 export const parseClassNames = memoize((rawCssCode: string): string[] => {
     const rulesByBreakpoint = getRulesByBreakpoint(rawCssCode);
 
-    const classes = new Set<string>();
+    const classNames = new Set<string>();
 
     objectKeys(rulesByBreakpoint).forEach(breakpoint => {
         const rules = rulesByBreakpoint[breakpoint];
 
         rules.forEach(({ selectors }) => {
             selectors.forEach(selector => {
-                const matchArr = selector.match(/^\.(fr-[a-zA-Z0-9_-]+)/);
+                const matchArr = selector.match(/\.fr-[a-zA-Z0-9_-]+/g);
 
                 if (matchArr === null) {
                     return;
                 }
 
-                classes.add(matchArr[1]);
+                matchArr
+                    .map(matchedStr => matchedStr.replace(/^\./, ""))
+                    .forEach(className => classNames.add(className));
             });
         });
     });
 
-    return Array.from(classes);
+    return Array.from(classNames);
 });
 
 export function generateClassNamesTsCode(params: {

test/runtime/bin/classNames/parseClassNames.test.ts

@@ -20,14 +20,26 @@ it("Parsing of fr classnames", () => {
   padding: 0.5rem;
 }
 
+.fr-header__navbar .fr-btn--menu {
+  color: #3a3a3a;
+}
+
 @media (min-width: 36em) { }
 @media (min-width: 48em) { }
 @media (min-width: 62em) { }
 @media (min-width: 78em) { }
 
 `;
 
-    const expected = ["fr-text--light", "fr-text--xl", "fr-text--lead", "fr-grid-row--gutters"];
+    const expected = [
+        "fr-text--light",
+        "fr-text--xl",
+        "fr-text--lead",
+        "fr-grid-row--gutters",
+        "fr-col",
+        "fr-header__navbar",
+        "fr-btn--menu"
+    ];
 
     const got = parseClassNames(input);