Make xrefs.json include cross-spec definitions

Fixes #47
whatwg · Jun 9, 2017 · fc38205 · fc38205
1 parent ad07024
commit fc38205
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/wattsi.pas b/src/wattsi.pas
@@ -1245,7 +1245,7 @@    TCrossReferences = record
                   EnsureID(CrossRefNode^.Element, CrossRefNode^.LastHeading + ':' + ID.AsString);
                   NewLink := ConstructHTMLElement(eA);
                   CrossRefNode^.Element.SwapChildNodes(NewLink);
-                  if ((Variant <> vDEV) and (not DFN.HasAttribute(kCrossSpecRefAttribute))) then
+                  if (Variant <> vDEV) then
                   begin
                      DFNAnchor := ID.AsString;
                      SectionName := DelSpace1(StringReplace(StringReplace(CrossRefNode^.LastHeadingText, #$0A, ' ', [rfReplaceAll]), #$22, '\' + #$22, [rfReplaceAll]));