@samva/markup 0.4.0 → 0.6.0

package/dist/{elements-DtwKlFVH.d.ts → elements-BzjjnoCS.d.ts}

@@ -1,169 +1,48 @@
-import { i as JsxSourceLocation } from "./source-locations-BCJQnIfU.js";
-import { r as EmailDiagnostic } from "./diagnostics-Djd9ckLg.js";
-import { Data } from "effect";
+import { i as JsxSourceLocation } from "./source-locations-DrCM82Ym.js";
+import { r as EmailDiagnostic } from "./diagnostics-BMYtBCQk.js";
 //#region src/email/jsx-runtime.d.ts
 /** Derived authoring tree; source stays canonical. Origins run from inner element to component call sites. */
-type EmailNode = Data.TaggedEnum<{
-  Text: {
-    readonly value: string;
-  };
-  Element: {
-    readonly tag: string;
-    readonly props: Readonly<Record<string, unknown>>;
-    readonly children: readonly EmailNode[];
-    readonly origins: readonly JsxSourceLocation[];
-    /**
-     * True when this element is written at `origins[0]`; false when a compiler
-     * primitive generated it and `origins[0]` is the call site that asked for
-     * it. Both point at the same authoring target, but only an authored element
-     * can have its own props edited there.
-     */
-    readonly authored: boolean;
-  };
-  Fragment: {
-    readonly children: readonly EmailNode[];
-  };
+type EmailNode = {
+  readonly type: "Text";
+  readonly value: string;
+} | {
+  readonly type: "Element";
+  readonly tag: string;
+  readonly props: Readonly<Record<string, unknown>>;
+  readonly children: readonly EmailNode[];
+  readonly origins: readonly JsxSourceLocation[];
   /**
-   * Compatibility markup a compiler primitive emits verbatim — conditional
-   * comments and VML. Only the primitives in `./components` construct it;
-   * nothing an author passes as a string reaches this node.
+   * True when this element is written at `origins[0]`; false when a compiler
+   * primitive generated it and `origins[0]` is the call site that asked for
+   * it. Both point at the same authoring target, but only an authored element
+   * can have its own props edited there.
    */
-  Raw: {
-    readonly html: string;
-    readonly text: string;
-    readonly origins: readonly JsxSourceLocation[];
-  };
+  readonly authored: boolean;
+} | {
+  readonly type: "Fragment";
+  readonly children: readonly EmailNode[];
+} |
+/**
+ * Compatibility markup a compiler primitive emits verbatim — conditional
+ * comments and VML. Only the primitives in `./components` construct it;
+ * nothing an author passes as a string reaches this node.
+ */
+{
+  readonly type: "Raw";
+  readonly html: string;
+  readonly text: string;
+  readonly origins: readonly JsxSourceLocation[];
+};
+type EmailNodeOf<Type extends EmailNode["type"]> = Extract<EmailNode, {
+  readonly type: Type;
 }>;
+type EmailNodeFields<Type extends EmailNode["type"]> = Omit<EmailNodeOf<Type>, "type">;
+/** Constructors for the authoring tree. The tree is data; nothing here validates it. */
 declare const EmailNode: {
-  readonly $is: <Tag extends "Element" | "Fragment" | "Raw" | "Text">(tag: Tag) => (u: unknown) => u is Extract<{
-    readonly _tag: "Element";
-    readonly tag: string;
-    readonly props: Readonly<Record<string, unknown>>;
-    readonly children: readonly EmailNode[];
-    readonly origins: readonly JsxSourceLocation[];
-    readonly authored: boolean;
-  }, {
-    readonly _tag: Tag;
-  }> | Extract<{
-    readonly _tag: "Fragment";
-    readonly children: readonly EmailNode[];
-  }, {
-    readonly _tag: Tag;
-  }> | Extract<{
-    readonly _tag: "Raw";
-    readonly html: string;
-    readonly text: string;
-    readonly origins: readonly JsxSourceLocation[];
-  }, {
-    readonly _tag: Tag;
-  }> | Extract<{
-    readonly _tag: "Text";
-    readonly value: string;
-  }, {
-    readonly _tag: Tag;
-  }>;
-  readonly $match: {
-    <Cases extends { readonly [Tag in "Element" | "Fragment" | "Raw" | "Text"]: (args: Extract<{
-      readonly _tag: "Element";
-      readonly tag: string;
-      readonly props: Readonly<Record<string, unknown>>;
-      readonly children: readonly EmailNode[];
-      readonly origins: readonly JsxSourceLocation[];
-      readonly authored: boolean;
-    } | {
-      readonly _tag: "Fragment";
-      readonly children: readonly EmailNode[];
-    } | {
-      readonly _tag: "Raw";
-      readonly html: string;
-      readonly text: string;
-      readonly origins: readonly JsxSourceLocation[];
-    } | {
-      readonly _tag: "Text";
-      readonly value: string;
-    }, {
-      readonly _tag: Tag;
-    }>) => any; }>(cases: Cases): (value: {
-      readonly _tag: "Element";
-      readonly tag: string;
-      readonly props: Readonly<Record<string, unknown>>;
-      readonly children: readonly EmailNode[];
-      readonly origins: readonly JsxSourceLocation[];
-      readonly authored: boolean;
-    } | {
-      readonly _tag: "Fragment";
-      readonly children: readonly EmailNode[];
-    } | {
-      readonly _tag: "Raw";
-      readonly html: string;
-      readonly text: string;
-      readonly origins: readonly JsxSourceLocation[];
-    } | {
-      readonly _tag: "Text";
-      readonly value: string;
-    }) => import("effect/Unify").Unify<ReturnType<Cases["Element" | "Fragment" | "Raw" | "Text"]>>;
-    <Cases extends { readonly [Tag in "Element" | "Fragment" | "Raw" | "Text"]: (args: Extract<{
-      readonly _tag: "Element";
-      readonly tag: string;
-      readonly props: Readonly<Record<string, unknown>>;
-      readonly children: readonly EmailNode[];
-      readonly origins: readonly JsxSourceLocation[];
-      readonly authored: boolean;
-    } | {
-      readonly _tag: "Fragment";
-      readonly children: readonly EmailNode[];
-    } | {
-      readonly _tag: "Raw";
-      readonly html: string;
-      readonly text: string;
-      readonly origins: readonly JsxSourceLocation[];
-    } | {
-      readonly _tag: "Text";
-      readonly value: string;
-    }, {
-      readonly _tag: Tag;
-    }>) => any; }>(value: {
-      readonly _tag: "Element";
-      readonly tag: string;
-      readonly props: Readonly<Record<string, unknown>>;
-      readonly children: readonly EmailNode[];
-      readonly origins: readonly JsxSourceLocation[];
-      readonly authored: boolean;
-    } | {
-      readonly _tag: "Fragment";
-      readonly children: readonly EmailNode[];
-    } | {
-      readonly _tag: "Raw";
-      readonly html: string;
-      readonly text: string;
-      readonly origins: readonly JsxSourceLocation[];
-    } | {
-      readonly _tag: "Text";
-      readonly value: string;
-    }, cases: Cases): import("effect/Unify").Unify<ReturnType<Cases["Element" | "Fragment" | "Raw" | "Text"]>>;
-  };
-  readonly Element: Data.TaggedEnum.ConstructorFrom<{
-    readonly _tag: "Element";
-    readonly tag: string;
-    readonly props: Readonly<Record<string, unknown>>;
-    readonly children: readonly EmailNode[];
-    readonly origins: readonly JsxSourceLocation[];
-    readonly authored: boolean;
-  }, "_tag">;
-  readonly Fragment: Data.TaggedEnum.ConstructorFrom<{
-    readonly _tag: "Fragment";
-    readonly children: readonly EmailNode[];
-  }, "_tag">;
-  readonly Raw: Data.TaggedEnum.ConstructorFrom<{
-    readonly _tag: "Raw";
-    readonly html: string;
-    readonly text: string;
-    readonly origins: readonly JsxSourceLocation[];
-  }, "_tag">;
-  readonly Text: Data.TaggedEnum.ConstructorFrom<{
-    readonly _tag: "Text";
-    readonly value: string;
-  }, "_tag">;
+  readonly Text: (fields: EmailNodeFields<"Text">) => EmailNodeOf<"Text">;
+  readonly Element: (fields: EmailNodeFields<"Element">) => EmailNodeOf<"Element">;
+  readonly Fragment: (fields: EmailNodeFields<"Fragment">) => EmailNodeOf<"Fragment">;
+  readonly Raw: (fields: EmailNodeFields<"Raw">) => EmailNodeOf<"Raw">;
 };
 type EmailChild = EmailNode | string | number | boolean | null | undefined | readonly EmailChild[];
 type EmailComponent<P = never> = (props: P) => EmailChild;
@@ -817,4 +696,4 @@ type ChildrenProp<Content extends EmailElementSpec["content"]> = Content extends
 type EmailIntrinsicElements = { readonly [Tag in EmailTag]: EmailGlobalProps & AttributeProps<typeof EMAIL_GLOBAL_ATTRIBUTES> & AttributeProps<(typeof EMAIL_ELEMENTS)[Tag]["attributes"]> & ChildrenProp<(typeof EMAIL_ELEMENTS)[Tag]["content"]>; };
 //#endregion
 export { reportEmailDiagnostic as C, rawMarkup as S, currentEmailOrigins as _, EmailGlobalProps as a, jsxs as b, EmailStyle as c, isUrlAttribute as d, EmailChild as f, JSX as g, Fragment as h, EmailElementSpec as i, EmailTag as l, EmailNode as m, EMAIL_GLOBAL_ATTRIBUTES as n, EmailIntrinsicElements as o, EmailComponent as p, EmailAttributeSpec as r, EmailLayout as s, EMAIL_ELEMENTS as t, emailElement as u, drainEmailDiagnostics as v, normalizeChildren as x, jsx as y };
-//# sourceMappingURL=elements-DtwKlFVH.d.ts.map
+//# sourceMappingURL=elements-BzjjnoCS.d.ts.map

package/dist/email/components.d.ts

@@ -1,4 +1,4 @@
-import { c as EmailStyle, f as EmailChild, m as EmailNode } from "../elements-DtwKlFVH.js";
+import { c as EmailStyle, f as EmailChild, m as EmailNode } from "../elements-BzjjnoCS.js";
 //#region src/email/components.d.ts
 /** Marks the hidden preview block so the renderer can read it back and the text lane can keep it. */
 declare const PREHEADER_ATTRIBUTE = "data-samva-preheader";

package/dist/email/components.js

@@ -107,24 +107,54 @@ const Column = ({ className, align, valign, width, style, children }) => jsx("td
 const DEFAULT_BUTTON_FONT = "Helvetica, Arial, sans-serif";
 /** Average advance of a bold sans-serif glyph, as a fraction of the font size. */
 const BOLD_GLYPH_ADVANCE = .6;
+const invalidButtonNumber = (name) => reportEmailDiagnostic({
+	code: "invalid-button-number",
+	severity: "error",
+	message: `<Button ${name}> must be a finite number.`
+});
+const buttonNumber = (name, value, fallback) => {
+	if (typeof value === "number" && Number.isFinite(value)) return value;
+	invalidButtonNumber(name);
+	return fallback;
+};
+const optionalButtonNumber = (name, value) => {
+	if (value === void 0) return void 0;
+	if (typeof value === "number" && Number.isFinite(value)) return value;
+	invalidButtonNumber(name);
+};
+const optionalPositiveButtonNumber = (name, value) => {
+	if (value === void 0) return void 0;
+	if (typeof value === "number" && Number.isFinite(value) && value > 0) return value;
+	reportEmailDiagnostic({
+		code: "invalid-button-number",
+		severity: "error",
+		message: `<Button ${name}> must be a positive finite number.`
+	});
+};
 /** A link styled as a button, with a VML fallback so classic Outlook draws the shape. */
 const Button = ({ className, href, width, height, paddingX = 16, backgroundColor = "#000000", color = "#ffffff", borderRadius = 0, borderColor, borderWidth = 0, fontSize = 16, fontFamily = DEFAULT_BUTTON_FONT, align = "left", style, children }) => {
+	const safeWidth = optionalButtonNumber("width", width);
+	const safeHeight = optionalPositiveButtonNumber("height", height);
+	const safePaddingX = buttonNumber("paddingX", paddingX, 16);
+	const safeBorderRadius = buttonNumber("borderRadius", borderRadius, 0);
+	const safeBorderWidth = buttonNumber("borderWidth", borderWidth, 0);
+	const safeFontSize = buttonNumber("fontSize", fontSize, 16);
 	const label = typeof children === "string" ? children : void 0;
-	const fallback = height !== void 0 && label !== void 0;
+	const fallback = safeHeight !== void 0 && label !== void 0;
 	if (!fallback) reportEmailDiagnostic({
 		code: "button-outlook-fallback",
 		severity: "warning",
 		message: "<Button> draws its classic Outlook shape from VML, which needs a height and a plain string label. Without both, classic Windows Outlook shows an unstyled link.",
 		clients: ["outlook-windows"]
 	});
-	const arcsize = height === void 0 ? 0 : Math.round(borderRadius / height * 100);
-	const fallbackWidth = width ?? Math.ceil((label?.length ?? 0) * fontSize * BOLD_GLYPH_ADVANCE) + 2 * paddingX;
+	const arcsize = safeHeight === void 0 ? 0 : Math.round(safeBorderRadius / safeHeight * 100);
+	const fallbackWidth = safeWidth ?? Math.ceil((label?.length ?? 0) * safeFontSize * BOLD_GLYPH_ADVANCE) + 2 * safePaddingX;
 	return presentation({
 		width: "100%",
 		style: { borderCollapse: "collapse" }
 	}, jsx("td", {
 		align,
-		children: [fallback ? rawMarkup(`<!--[if mso]><v:roundrect xmlns:v="urn:schemas-microsoft-com:vml" xmlns:w="urn:schemas-microsoft-com:office:word" href="${escapeAttribute(href)}" style="height:${height}px;v-text-anchor:middle;width:${fallbackWidth}px;" arcsize="${arcsize}%" ${borderColor === void 0 ? "stroke=\"false\"" : `strokecolor="${escapeAttribute(borderColor)}" strokeweight="${borderWidth}px"`} fillcolor="${escapeAttribute(backgroundColor)}"><w:anchorlock/><center style="color:${escapeAttribute(color)};font-family:${escapeAttribute(fontFamily)};font-size:${fontSize}px;font-weight:bold;">${escapeText(label)}</center></v:roundrect><![endif]-->`) : null, jsx("a", {
+		children: [fallback ? rawMarkup(`<!--[if mso]><v:roundrect xmlns:v="urn:schemas-microsoft-com:vml" xmlns:w="urn:schemas-microsoft-com:office:word" href="${escapeAttribute(href)}" style="height:${safeHeight}px;v-text-anchor:middle;width:${fallbackWidth}px;" arcsize="${arcsize}%" ${borderColor === void 0 ? "stroke=\"false\"" : `strokecolor="${escapeAttribute(borderColor)}" strokeweight="${safeBorderWidth}px"`} fillcolor="${escapeAttribute(backgroundColor)}"><w:anchorlock/><center style="color:${escapeAttribute(color)};font-family:${escapeAttribute(fontFamily)};font-size:${safeFontSize}px;font-weight:bold;">${escapeText(label)}</center></v:roundrect><![endif]-->`) : null, jsx("a", {
 			className,
 			href,
 			target: "_blank",
@@ -132,19 +162,19 @@ const Button = ({ className, href, width, height, paddingX = 16, backgroundColor
 			style: {
 				backgroundColor,
 				color,
-				borderRadius: `${borderRadius}px`,
+				borderRadius: `${safeBorderRadius}px`,
 				display: "inline-block",
 				fontFamily,
-				fontSize: `${fontSize}px`,
+				fontSize: `${safeFontSize}px`,
 				fontWeight: "bold",
-				lineHeight: height === void 0 ? "120%" : `${height - 2 * borderWidth}px`,
+				lineHeight: safeHeight === void 0 ? "120%" : `${safeHeight - 2 * safeBorderWidth}px`,
 				textAlign: "center",
 				textDecoration: "none",
-				...width === void 0 ? { padding: `0 ${paddingX}px` } : {
-					width: `${width}px`,
+				...safeWidth === void 0 ? { padding: `0 ${safePaddingX}px` } : {
+					width: `${safeWidth}px`,
 					maxWidth: "100%"
 				},
-				...borderColor === void 0 ? {} : { border: `${borderWidth}px solid ${borderColor}` },
+				...borderColor === void 0 ? {} : { border: `${safeBorderWidth}px solid ${borderColor}` },
 				...fallback ? { msoHide: "all" } : {},
 				...style
 			},

package/dist/email/diagnostics.d.ts

@@ -1,2 +1,2 @@
-import { a as formatEmailDiagnostic, i as EmailDiagnosticSeverity, n as EmailCompileError, o as hasBlockingDiagnostic, r as EmailDiagnostic, t as EmailCompatibilityAssessment } from "../diagnostics-Djd9ckLg.js";
+import { a as formatEmailDiagnostic, i as EmailDiagnosticSeverity, n as EmailCompileError, o as hasBlockingDiagnostic, r as EmailDiagnostic, t as EmailCompatibilityAssessment } from "../diagnostics-BMYtBCQk.js";
 export { EmailCompatibilityAssessment, EmailCompileError, EmailDiagnostic, EmailDiagnosticSeverity, formatEmailDiagnostic, hasBlockingDiagnostic };

package/dist/email/diagnostics.js

@@ -1,46 +1,11 @@
-import { JsxSourceLocation } from "../source-locations.js";
-import { Schema } from "effect";
+import { TaggedError } from "better-result";
 //#region src/email/diagnostics.ts
-const EmailDiagnosticSeverity = Schema.Literals([
-	"error",
-	"warning",
-	"info"
-]);
-/** What the emitted document establishes beyond the client feature matrix. */
-const EmailCompatibilityAssessment = Schema.Struct({
-	assessment: Schema.Literals([
-		"risk",
-		"degradation",
-		"unverified",
-		"not-applicable"
-	]),
-	/** A short description of the consequence or the remaining verification. */
-	title: Schema.String
-});
-const EmailDiagnostic = Schema.Struct({
-	/** Stable identifier, e.g. `unsupported-element` or `caniemail/css-border-radius`. */
-	code: Schema.String,
-	severity: EmailDiagnosticSeverity,
-	/** States what is wrong and what to write instead. */
-	message: Schema.String,
-	/** Innermost authoring element first, then each enclosing component call site. */
-	origins: Schema.Array(JsxSourceLocation),
-	/** Target clients a compatibility finding applies to. */
-	clients: Schema.optional(Schema.Array(Schema.String)),
-	/** Partial-support notes and other caveats a client matrix carries. */
-	notes: Schema.optional(Schema.String),
-	/** Which pinned rule data produced the finding. */
-	provenance: Schema.optional(Schema.String),
-	/** Declared fixtures whose rendered output produced this finding. */
-	fixtures: Schema.optional(Schema.Array(Schema.String)),
-	/** Source chains for every located emitted occurrence; origins identifies the first. */
-	occurrences: Schema.optional(Schema.Array(Schema.Array(JsxSourceLocation))),
-	/** Compatibility observations are not automatically defects or proof of client rendering. */
-	compatibility: Schema.optional(EmailCompatibilityAssessment)
-});
-var EmailCompileError = class extends Schema.TaggedError()("EmailCompileError", { diagnostics: Schema.Array(EmailDiagnostic) }) {
-	get message() {
-		return this.diagnostics.map(formatEmailDiagnostic).join("\n");
+var EmailCompileError = class extends TaggedError("EmailCompileError") {
+	constructor(args) {
+		super({
+			diagnostics: args.diagnostics,
+			message: args.diagnostics.map(formatEmailDiagnostic).join("\n")
+		});
 	}
 };
 /** `emails/welcome.tsx:12:3 unsupported-element: …` — the shape agents iterate on. */
@@ -51,6 +16,6 @@ const formatEmailDiagnostic = (diagnostic) => {
 /** True when a set of findings must stop the compile or refuse a publication. */
 const hasBlockingDiagnostic = (diagnostics) => diagnostics.some((diagnostic) => diagnostic.severity === "error");
 //#endregion
-export { EmailCompatibilityAssessment, EmailCompileError, EmailDiagnostic, EmailDiagnosticSeverity, formatEmailDiagnostic, hasBlockingDiagnostic };
+export { EmailCompileError, formatEmailDiagnostic, hasBlockingDiagnostic };
 
 //# sourceMappingURL=diagnostics.js.map

package/dist/email/elements.d.ts

@@ -1,2 +1,2 @@
-import { a as EmailGlobalProps, c as EmailStyle, d as isUrlAttribute, i as EmailElementSpec, l as EmailTag, n as EMAIL_GLOBAL_ATTRIBUTES, o as EmailIntrinsicElements, r as EmailAttributeSpec, s as EmailLayout, t as EMAIL_ELEMENTS, u as emailElement } from "../elements-DtwKlFVH.js";
+import { a as EmailGlobalProps, c as EmailStyle, d as isUrlAttribute, i as EmailElementSpec, l as EmailTag, n as EMAIL_GLOBAL_ATTRIBUTES, o as EmailIntrinsicElements, r as EmailAttributeSpec, s as EmailLayout, t as EMAIL_ELEMENTS, u as emailElement } from "../elements-BzjjnoCS.js";
 export { EMAIL_ELEMENTS, EMAIL_GLOBAL_ATTRIBUTES, EmailAttributeSpec, EmailElementSpec, EmailGlobalProps, EmailIntrinsicElements, EmailLayout, EmailStyle, EmailTag, emailElement, isUrlAttribute };

package/dist/email/html.d.ts

@@ -1,5 +1,5 @@
-import { r as EmailDiagnostic } from "../diagnostics-Djd9ckLg.js";
-import { m as EmailNode } from "../elements-DtwKlFVH.js";
+import { r as EmailDiagnostic } from "../diagnostics-BMYtBCQk.js";
+import { m as EmailNode } from "../elements-BzjjnoCS.js";
 import { EmittedPosition } from "./selection.js";
 //#region src/email/html.d.ts
 /** Escape a value for element content. */

package/dist/email/html.js

@@ -1,6 +1,6 @@
+import { n as isObject } from "../guards-eV1qLbf2.js";
 import { EMAIL_ELEMENTS, EMAIL_GLOBAL_ATTRIBUTES, emailElement } from "./elements.js";
 import { INSTANCE_PATH_ATTRIBUTE } from "./selection.js";
-import { Predicate } from "effect";
 //#region src/email/html.ts
 /** Escape a value for element content. */
 const escapeText = (value) => value.replace(/[&<>]/g, (character) => ({
@@ -136,7 +136,7 @@ const attributes = (sink, tag, spec, props, origins) => {
 		}
 		if (name === "style") {
 			if (value === void 0 || value === null) continue;
-			if (!Predicate.isObject(value) || Array.isArray(value)) {
+			if (!isObject(value) || Array.isArray(value)) {
 				report(sink, "invalid-style", `<${tag} style> must be a property object, for example style={{ backgroundColor: "#fff" }}.`, origins);
 				continue;
 			}
@@ -153,7 +153,8 @@ const attributes = (sink, tag, spec, props, origins) => {
 			if (text !== void 0) emitted.push(` ${name}="${escapeAttribute(text)}"`);
 			continue;
 		}
-		const attribute = EMAIL_GLOBAL_ATTRIBUTES[name] ?? spec.attributes[name];
+		const globalAttributes = EMAIL_GLOBAL_ATTRIBUTES;
+		const attribute = Object.hasOwn(globalAttributes, name) ? globalAttributes[name] : Object.hasOwn(spec.attributes, name) ? spec.attributes[name] : void 0;
 		if (attribute === void 0) {
 			const supported = [
 				...Object.keys(EMAIL_GLOBAL_ATTRIBUTES),
@@ -172,24 +173,24 @@ const attributes = (sink, tag, spec, props, origins) => {
 	return emitted.join("");
 };
 /** Fragments are transparent to a content model; raw compatibility markup is not content. */
-const contentChildren = (children) => children.flatMap((child) => child._tag === "Fragment" ? contentChildren(child.children) : [child]);
+const contentChildren = (children) => children.flatMap((child) => child.type === "Fragment" ? contentChildren(child.children) : [child]);
 const checkContentModel = (sink, tag, spec, children, origins) => {
 	if (spec.content === "void") {
 		if (contentChildren(children).length > 0) report(sink, "void-element-children", `<${tag}> cannot have children.`, origins);
 		return;
 	}
 	if (spec.content === "text" || spec.content === "raw") {
-		for (const child of contentChildren(children)) if (child._tag !== "Text") report(sink, "invalid-content", `<${tag}> accepts text only.`, child._tag === "Element" ? child.origins : origins);
+		for (const child of contentChildren(children)) if (child.type !== "Text") report(sink, "invalid-content", `<${tag}> accepts text only.`, child.type === "Element" ? child.origins : origins);
 		return;
 	}
 	if (spec.childElements === void 0) return;
 	for (const child of contentChildren(children)) {
-		if (child._tag === "Raw") continue;
-		if (child._tag === "Text") {
+		if (child.type === "Raw") continue;
+		if (child.type === "Text") {
 			if (child.value.trim() !== "") report(sink, "invalid-content", `<${tag}> cannot contain text directly; put it inside <${spec.childElements[0]}>.`, origins);
 			continue;
 		}
-		if (child._tag === "Element" && !spec.childElements.includes(child.tag)) report(sink, "invalid-content", `<${tag}> accepts only ${spec.childElements.map((name) => `<${name}>`).join(", ")}; found <${child.tag}>.`, child.origins);
+		if (child.type === "Element" && !spec.childElements.includes(child.tag)) report(sink, "invalid-content", `<${tag}> accepts only ${spec.childElements.map((name) => `<${name}>`).join(", ")}; found <${child.tag}>.`, child.origins);
 	}
 };
 /** Every write goes through here so `sink.written` stays the emitted offset. */
@@ -198,7 +199,7 @@ const emit = (sink, text) => {
 	return text;
 };
 const serialize = (sink, node, parentPath, counter) => {
-	switch (node._tag) {
+	switch (node.type) {
 		case "Text": return emit(sink, escapeText(node.value));
 		case "Raw": return emit(sink, node.html);
 		case "Fragment": return node.children.map((child) => serialize(sink, child, parentPath, counter)).join("");
@@ -215,7 +216,7 @@ const serialize = (sink, node, parentPath, counter) => {
 			}
 			checkContentModel(sink, node.tag, spec, node.children, node.origins);
 			if (spec.content === "raw") {
-				const css = node.children.map((child) => child._tag === "Text" ? child.value : "").join("");
+				const css = node.children.map((child) => child.type === "Text" ? child.value : "").join("");
 				if (/<\/|<!--/i.test(css)) {
 					report(sink, "unsafe-raw-text", `<${node.tag}> content cannot contain markup.`, node.origins);
 					return "";

package/dist/email/jsx-dev-runtime.d.ts

@@ -1,26 +1,8 @@
-import { i as JsxSourceLocation, r as JsxSource } from "../source-locations-BCJQnIfU.js";
-import { g as JSX, h as Fragment, m as EmailNode, p as EmailComponent } from "../elements-DtwKlFVH.js";
+import { r as JsxSource } from "../source-locations-DrCM82Ym.js";
+import { g as JSX, h as Fragment, m as EmailNode, p as EmailComponent } from "../elements-BzjjnoCS.js";
 //#region src/email/jsx-dev-runtime.d.ts
 /** Development JSX retains compiler-provided origins directly on the semantic tree. */
-declare const jsxDEV: (type: string | EmailComponent<Record<string, unknown>> | typeof Fragment, props: Record<string, unknown> | null, _key?: unknown, _staticChildren?: boolean, source?: JsxSource) => {
-  readonly _tag: "Element";
-  readonly tag: string;
-  readonly props: Readonly<Record<string, unknown>>;
-  readonly children: readonly EmailNode[];
-  readonly origins: readonly JsxSourceLocation[];
-  readonly authored: boolean;
-} | {
-  readonly _tag: "Fragment";
-  readonly children: readonly EmailNode[];
-} | {
-  readonly _tag: "Raw";
-  readonly html: string;
-  readonly text: string;
-  readonly origins: readonly JsxSourceLocation[];
-} | {
-  readonly _tag: "Text";
-  readonly value: string;
-};
+declare const jsxDEV: (type: string | EmailComponent<Record<string, unknown>> | typeof Fragment, props: Record<string, unknown> | null, _key?: unknown, _staticChildren?: boolean, source?: JsxSource) => EmailNode;
 //#endregion
 export { Fragment, type JSX, jsxDEV };
 //# sourceMappingURL=jsx-dev-runtime.d.ts.map

package/dist/email/jsx-runtime.d.ts

@@ -1,2 +1,2 @@
-import { C as reportEmailDiagnostic, S as rawMarkup, _ as currentEmailOrigins, b as jsxs, f as EmailChild, g as JSX, h as Fragment, m as EmailNode, p as EmailComponent, v as drainEmailDiagnostics, x as normalizeChildren, y as jsx } from "../elements-DtwKlFVH.js";
+import { C as reportEmailDiagnostic, S as rawMarkup, _ as currentEmailOrigins, b as jsxs, f as EmailChild, g as JSX, h as Fragment, m as EmailNode, p as EmailComponent, v as drainEmailDiagnostics, x as normalizeChildren, y as jsx } from "../elements-BzjjnoCS.js";
 export { EmailChild, EmailComponent, EmailNode, Fragment, JSX, currentEmailOrigins, drainEmailDiagnostics, jsx, jsxs, normalizeChildren, rawMarkup, reportEmailDiagnostic };

package/dist/email/jsx-runtime.js

@@ -1,7 +1,33 @@
+import { t as hasProperty } from "../guards-eV1qLbf2.js";
 import { JSX_SOURCE_LOCATION_PROP, completeJsxSourceLocation } from "../source-locations.js";
-import { Data, Predicate } from "effect";
 //#region src/email/jsx-runtime.ts
-const EmailNode = Data.taggedEnum();
+/** Constructors for the authoring tree. The tree is data; nothing here validates it. */
+const EmailNode = {
+	Text: (fields) => ({
+		type: "Text",
+		...fields
+	}),
+	Element: (fields) => ({
+		type: "Element",
+		...fields
+	}),
+	Fragment: (fields) => ({
+		type: "Fragment",
+		...fields
+	}),
+	Raw: (fields) => ({
+		type: "Raw",
+		...fields
+	})
+};
+const EMAIL_NODE_TYPES = /* @__PURE__ */ new Set([
+	"Text",
+	"Element",
+	"Fragment",
+	"Raw"
+]);
+/** True for a node this runtime built; anything else is not a child it can place. */
+const isEmailNode = (input) => hasProperty(input, "type") && typeof input.type === "string" && EMAIL_NODE_TYPES.has(input.type);
 const Fragment = Symbol.for("@samva/markup/email/Fragment");
 const callSites = [];
 /** Call sites enclosing the element being built, innermost first. */
@@ -22,7 +48,7 @@ const normalizeChildren = (input) => {
 	if (typeof input === "string") return [EmailNode.Text({ value: input })];
 	if (typeof input === "number" && Number.isFinite(input)) return [EmailNode.Text({ value: String(input) })];
 	if (Array.isArray(input)) return input.flatMap(normalizeChildren);
-	if (Predicate.isTagged(input, "Text") || Predicate.isTagged(input, "Element") || Predicate.isTagged(input, "Fragment") || Predicate.isTagged(input, "Raw")) return [input];
+	if (isEmailNode(input)) return [input];
 	throw new TypeError("Email children must be synchronous text, finite numbers, elements, or arrays");
 };
 /** Compatibility markup emitted by a compiler primitive, with the text it stands for. */

package/dist/email/render.d.ts

@@ -1,9 +1,9 @@
-import { r as EmailDiagnostic } from "../diagnostics-Djd9ckLg.js";
-import { m as EmailNode } from "../elements-DtwKlFVH.js";
+import { r as EmailDiagnostic } from "../diagnostics-BMYtBCQk.js";
+import { m as EmailNode } from "../elements-BzjjnoCS.js";
 import { EmittedPosition } from "./selection.js";
 import { SerializeEmailOptions } from "./html.js";
-import { r as TemplateDefinition } from "../template-Dy5yOPyp.js";
-import { i as Stylesheet } from "../css-ar2lU3NC.js";
+import { r as TemplateDefinition } from "../template-DWftqh4x.js";
+import { i as Stylesheet } from "../css-COcFOT1y.js";
 //#region src/email/render.d.ts
 /** Classic Outlook lays a document out correctly only under a transitional doctype. */
 declare const EMAIL_DOCTYPE = "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Transitional//EN\" \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd\">";

package/dist/email/render.js

@@ -1,4 +1,4 @@
-import { i as renderEmail, n as bindStylesheets, r as compileEmail, t as EMAIL_DOCTYPE } from "../render-ykQhtMs_.js";
+import { i as renderEmail, n as bindStylesheets, r as compileEmail, t as EMAIL_DOCTYPE } from "../render-aaJBnsXK.js";
 import "./html.js";
 import "./diagnostics.js";
 import "./stylesheets.js";