svelte-preprocess-org 0.3.4 → 0.3.6

package/dist/{index.d.ts → index-CiNPUOqC.d.ts}

@@ -1,6 +1,19 @@
 import { PreprocessorGroup } from "svelte/compiler";
 
 //#region src/emacs.d.ts
+/**
+ * Options for starting an Emacs intsance.
+ */
+type EmacsCustomization = {
+  /**
+   * Directory to use as Emacs `user-emacs-directory`.
+   */
+  initDirectory: string;
+  /**
+   * Largest amount of data in bytes allowed on stdout or stderr.
+   */
+  maxBuffer: number;
+};
 /**
  * An S-expression.
  */
@@ -122,19 +135,15 @@ type OrgPreprocessOptions = Partial<{
    * List of glob patterns to locate Org files for updating ID locations.
    */
   idLocations: string[];
-  /**
-   * Directory to use as Emacs `user-emacs-directory`.
-   */
-  initDirectory: string;
   /**
    * List of extra S-expressions to evaluate during initialization.
    */
   initSexps: Sexp[];
-}> & OrgExportCustomization & OrgSvelteCustomization;
+}> & EmacsCustomization & OrgExportCustomization & OrgSvelteCustomization;
 /**
  * Preprocess Org documents to Svelte components.
  */
 declare function orgPreprocess(options?: OrgPreprocessOptions): PreprocessorGroup;
 //#endregion
 export { OrgPreprocessOptions, orgPreprocess as default, orgPreprocess };
-//# sourceMappingURL=index.d.ts.map
+//# sourceMappingURL=index-CiNPUOqC.d.ts.map

package/dist/index.js

@@ -109,13 +109,13 @@ function stringify(sexp) {
 /**
 * Convert a list to a string.
 */
-function stringifyList(list$1) {
+function stringifyList(list) {
 	let result = "";
-	if (isCell(list$1.car)) result += `(${stringifyList(list$1.car)})`;
-	else result += stringify(list$1.car);
-	if (isCell(list$1.cdr)) result += ` ${stringifyList(list$1.cdr)}`;
-	else if (isNil(list$1.cdr)) return result;
-	else result += ` . ${stringify(list$1.cdr)}`;
+	if (isCell(list.car)) result += `(${stringifyList(list.car)})`;
+	else result += stringify(list.car);
+	if (isCell(list.cdr)) result += ` ${stringifyList(list.cdr)}`;
+	else if (isNil(list.cdr)) return result;
+	else result += ` . ${stringify(list.cdr)}`;
 	return result;
 }
 /**
@@ -127,6 +127,14 @@ function stringifyList(list$1) {
 * the .eld files).
 */
 var Emacs = class {
+	/**
+	* Directory that will be used as the `user-emacs-directory`.
+	*/
+	initDirectory;
+	/**
+	* Largest amount of data in bytes allowed on stdout or stderr.
+	*/
+	maxBuffer;
 	/**
 	* S-expression to evaluate when `run` method is called.
 	*/
@@ -134,18 +142,18 @@ var Emacs = class {
 	/**
 	* String value to be piped into the standard input.
 	*/
-	stdin;
+	stdin = "";
 	/**
 	* Initialize a new Emacs instance.
 	*
 	* Internally, this will request a temporary directory to be created, which
 	* will be used as the Emacs init directory when `Emacs.run` is called.
 	*
-	* @param initDirectory - Directory that will be used as the `user-emacs-directory`.
+	* @param initDirectory -
 	*/
-	constructor(initDirectory) {
-		this.initDirectory = initDirectory;
-		this.stdin = "";
+	constructor(opts) {
+		this.initDirectory = opts.initDirectory;
+		this.maxBuffer = opts.maxBuffer;
 	}
 	/**
 	* Register the features/packages to require.
@@ -188,7 +196,10 @@ var Emacs = class {
 			"--batch",
 			"--eval",
 			stringify(list(a`progn`, ...this.sexps))
-		], { input: this.stdin });
+		], {
+			input: this.stdin,
+			maxBuffer: this.maxBuffer
+		});
 		if (error) throw new Error(`Error running Emacs: ${stderr}`, { cause: error });
 		this.sexps = [];
 		this.stdin = "";
@@ -213,7 +224,7 @@ function toKebabCase(s) {
 /**
 * Generate Emacs Lisp code to customize the Org export engine.
 */
-function customize(options = {}) {
+function customize$1(options = {}) {
 	const transformed = Object.entries(options).flatMap(([key, val]) => {
 		switch (key) {
 			case "withProperties": return [a`org-export-with-properties`, Array.isArray(val) ? quote(list(...val)) : val];
@@ -259,14 +270,14 @@ function customize(options = {}) {
 /**
 * Generate Emacs Lisp code to customize the Org to Svelte export engine.
 */
-function customize$1(options = {}) {
+function customize(options = {}) {
 	const transformed = Object.entries(options).flatMap(([key, val]) => {
 		switch (key) {
 			case "componentImportAlist": {
 				const cia = val;
-				return [a`org-svelte-component-import-alist`, quote(list(...Object.entries(cia).map(([k$1, v]) => {
-					if (Array.isArray(v)) return cons(k$1, list(...v));
-					else return cons(k$1, v);
+				return [a`org-svelte-component-import-alist`, quote(list(...Object.entries(cia).map(([k, v]) => {
+					if (Array.isArray(v)) return cons(k, list(...v));
+					else return cons(k, v);
 				})))];
 			}
 			case "metadataExportList": {
@@ -275,7 +286,7 @@ function customize$1(options = {}) {
 			}
 			case "textMarkupAlist": {
 				const tma = val;
-				return [a`org-svelte-text-markup-alist`, quote(list(...Object.entries(tma).map(([key$1, val$1]) => cons(key$1, val$1))))];
+				return [a`org-svelte-text-markup-alist`, quote(list(...Object.entries(tma).map(([key, val]) => cons(key, val))))];
 			}
 			case "anchorFormat":
 			case "brokenLinkFormat":
@@ -309,8 +320,11 @@ const exportMinibufferAsSvelte = list(a`let`, list(list(a`content`, ``)), list(a
 * Preprocess Org documents to Svelte components.
 */
 function orgPreprocess(options) {
-	const { extensions = [".org"], idLocations = [], initDirectory = mkdtempSync(join(tmpdir(), "svelte-preprocess-org-")), initSexps = [],...rest } = options || {};
-	const emacs = new Emacs(initDirectory);
+	const { extensions = [".org"], idLocations = [], initDirectory = mkdtempSync(join(tmpdir(), "svelte-preprocess-org-")), initSexps = [], maxBuffer = 10 * 1024 * 1024, ...rest } = options || {};
+	const emacs = new Emacs({
+		initDirectory,
+		maxBuffer
+	});
 	if (initSexps.length > 0) emacs.progn(...initSexps).run();
 	if (idLocations.length > 0) {
 		const files = globSync(idLocations);
@@ -318,11 +332,10 @@ function orgPreprocess(options) {
 	}
 	return { markup({ content, filename }) {
 		if (filename && !extensions.some((ext) => filename.endsWith(ext))) return { code: content };
-		return { code: emacs.require("ox-svelte", fullpath).progn(customize(rest)).progn(customize$1(rest)).progn(exportMinibufferAsSvelte).minibuffer(content).run() };
+		return { code: emacs.require("ox-svelte", fullpath).progn(customize$1(rest)).progn(customize(rest)).progn(exportMinibufferAsSvelte).minibuffer(content).run() };
 	} };
 }
-var src_default = orgPreprocess;
 
 //#endregion
-export { src_default as default, orgPreprocess };
+export { orgPreprocess as default, orgPreprocess };
 //# sourceMappingURL=index.js.map

package/dist/index.js.map

@@ -1 +1 @@
-{"version":3,"file":"index.js","names":["list","initDirectory: string","customize","k","key","val","customizeOx","customizeOxSvelte"],"sources":["../src/emacs.ts","../src/utilities.ts","../src/org-export.ts","../src/org-svelte.ts","../src/index.ts"],"sourcesContent":["import { spawnSync } from \"node:child_process\";\n\n/**\n * An S-expression.\n */\nexport type Sexp = Value | Cell;\n\n/**\n * A value in an S-expression.\n */\nexport type Value = Atom | Keyword | Quote | string | number | boolean | null;\n\n/**\n * A cons cell.\n */\nexport type Cell = {\n  car: Sexp;\n  cdr: Sexp;\n};\n\n/**\n * An atom in an S-expression.\n */\nexport type Atom = {\n  atom: string;\n};\n\n/**\n * A keyword in an S-expression.\n */\nexport type Keyword = {\n  keyword: string;\n};\n\n/**\n * A quoted S-expression.\n */\nexport type Quote = {\n  quote: Sexp;\n};\n\n/**\n * Check if a value is a cons cell.\n */\nexport function isCell(x: unknown): x is Cell {\n  return x instanceof Object && \"car\" in x && \"cdr\" in x;\n}\n\n/**\n * Check if a value is an atom.\n */\nexport function isAtom(x: unknown): x is Atom {\n  return x instanceof Object && \"atom\" in x;\n}\n\n/**\n * Check if a value is a keyword.\n */\nexport function isKeyword(x: unknown): x is Keyword {\n  return x instanceof Object && \"keyword\" in x;\n}\n\n/**\n * Check if a value is a quoted S-expression.\n */\nexport function isQuote(x: unknown): x is Quote {\n  return x instanceof Object && \"quote\" in x;\n}\n\n/**\n * Check if a value is a valid value in an S-expression.\n */\nexport function isValue(x: unknown): x is Value {\n  return (\n    isAtom(x) ||\n    isKeyword(x) ||\n    isQuote(x) ||\n    isString(x) ||\n    isNumber(x) ||\n    isBoolean(x) ||\n    isNil(x)\n  );\n}\n\n/**\n * Check if a value is a nil value\n */\nexport function isNil(x: unknown): x is null {\n  return x === null;\n}\n\n/**\n * Check if a value is a list.\n *\n * Note that improper lists are also considered lists.\n */\nexport function isList(x: unknown): x is Cell {\n  return isCell(x) || isNil(x);\n}\n\n/**\n * Check if a value is a string.\n */\nexport function isString(x: unknown): x is string {\n  return typeof x === \"string\";\n}\n\n/**\n * Check if a value is a number.\n */\nexport function isNumber(x: unknown): x is number {\n  return typeof x === \"number\";\n}\n\n/**\n * Check if a value is a boolean.\n */\nexport function isBoolean(x: unknown): x is boolean {\n  return typeof x === \"boolean\";\n}\n\n/**\n * Create a cons cell.\n */\nexport function cons(car: Sexp, cdr: Sexp): Cell {\n  return { car, cdr };\n}\n\n/**\n * Create a quoted S-expression.\n */\nexport function quote(sexp: Sexp): Quote | Keyword {\n  if (isKeyword(sexp)) {\n    // A quoted keyword is still a keyword.\n    return k`${sexp.keyword}`;\n  } else {\n    // For the rest, just quote the S-expression.\n    return { quote: sexp };\n  }\n}\n\n/**\n * Create a list from a sequence of S-expressions.\n */\nexport function list(...args: Sexp[]): Sexp {\n  if (args.length === 0) {\n    return null;\n  }\n\n  const [car, ...rest] = args;\n  return cons(car, list(...rest));\n}\n\n/**\n * Create an atom from a tagged template string.\n */\nexport function a(\n  raw: TemplateStringsArray,\n  ...substitutions: unknown[]\n): Atom {\n  return { atom: String.raw({ raw }, ...substitutions) };\n}\n\n/**\n * Create a keyword from a tagged template string.\n */\nexport function k(\n  raw: TemplateStringsArray,\n  ...substitutions: unknown[]\n): Keyword {\n  return { keyword: String.raw({ raw }, ...substitutions) };\n}\n\n/**\n * Convert an S-expression to a string.\n */\nexport function stringify(sexp: Sexp): string {\n  // Dispatch based on the type of the expression.\n  switch (true) {\n    case isCell(sexp):\n      return `(${stringifyList(sexp)})`;\n    case isNil(sexp):\n      return \"nil\";\n    case isString(sexp):\n      return `\"${sexp}\"`;\n    case isNumber(sexp):\n      return sexp.toString();\n    case isBoolean(sexp):\n      return sexp ? \"t\" : \"nil\";\n    case isAtom(sexp):\n      return sexp.atom;\n    case isKeyword(sexp):\n      return `:${sexp.keyword}`;\n    case isQuote(sexp):\n      return `'${stringify(sexp.quote)}`;\n    default:\n      throw new TypeError(`Unknown type of S-expression: ${typeof sexp}`);\n  }\n}\n\n/**\n * Convert a list to a string.\n */\nfunction stringifyList(list: Cell): string {\n  // Stringify the car of the list.\n  let result = \"\";\n  if (isCell(list.car)) {\n    result += `(${stringifyList(list.car)})`;\n  } else {\n    result += stringify(list.car);\n  }\n\n  // There are three cases for a cdr:\n  // 1. cdr is another cell -> recursively stringify the cdr\n  // 2. cdr is nil -> end of the list, so just return the result\n  // 3. cdr is something else -> add a dot and the stringified cdr\n  if (isCell(list.cdr)) {\n    result += ` ${stringifyList(list.cdr)}`;\n  } else if (isNil(list.cdr)) {\n    return result;\n  } else {\n    result += ` . ${stringify(list.cdr)}`;\n  }\n\n  return result;\n}\n\n/**\n * An Emacs instance for evaluating S-expressions.\n *\n * Since each Emacs instance constructetd from this class is assigned their own\n * temporary directory as their init directory, any persistent state that needs\n * to be preserved between evaluations can be stored in that directory (e.g. in\n * the .eld files).\n */\nexport class Emacs {\n  /**\n   * S-expression to evaluate when `run` method is called.\n   */\n  private sexps: Sexp[] = [];\n\n  /**\n   * String value to be piped into the standard input.\n   */\n  private stdin: string;\n\n  /**\n   * Initialize a new Emacs instance.\n   *\n   * Internally, this will request a temporary directory to be created, which\n   * will be used as the Emacs init directory when `Emacs.run` is called.\n   *\n    * @param initDirectory - Directory that will be used as the `user-emacs-directory`.\n   */\n  constructor(private initDirectory: string) {\n    this.stdin = \"\";\n  }\n\n  /**\n   * Register the features/packages to require.\n   *\n   * This function will append to the previous value.\n   * The `run` call will not reset this value.\n   */\n  require(feature: string, filename?: string) {\n    this.sexps.push(\n      filename\n        ? list(a`require`, quote(a`${feature}`), filename)\n        : list(a`require`, quote(a`${feature}`)),\n    );\n\n    return this;\n  }\n\n  /**\n   * Register S-expressions to evaluate.\n   *\n   * This function will append to the previous value.\n   * The `run` call will reset this value.\n   */\n  progn(...sexps: Sexp[]) {\n    this.sexps.push(...sexps);\n\n    return this;\n  }\n\n  /**\n   * Register the string to be fed into the standard input.\n   *\n   * This function will replace the previous value.\n   * The `run` call will reset this value.\n   */\n  minibuffer(content: string) {\n    this.stdin = content;\n\n    return this;\n  }\n\n  /**\n   * Run the registered S-expressions in Emacs.\n   *\n   * @rehturns The standard output of the Emacs process.\n   */\n  run() {\n    // Spawn Emacs in batch mode to evaluate the S-expressions.\n    const { stdout, stderr, error } = spawnSync(\n      \"emacs\",\n      [\n        `--init-directory=${this.initDirectory}`,\n        \"--batch\",\n        \"--eval\",\n        stringify(list(a`progn`, ...this.sexps)),\n      ],\n      {\n        input: this.stdin,\n      },\n    );\n    if (error) {\n      throw new Error(`Error running Emacs: ${stderr}`, { cause: error });\n    }\n\n    // Reset the S-expressions and stdin for the next run.\n    this.sexps = [];\n    this.stdin = \"\";\n\n    // Return the standard output.\n    return stdout.toString();\n  }\n}\n","/**\n * Convert a lowerCamelCase string to kebab case.\n *\n * @param s The string to convert.\n * @returns The kebab-cased string.\n */\nexport function toKebabCase(s: string): string {\n  return s.replace(\n    /[A-Z]+(?!a-z)|[A-Z]/g,\n    (match, offset) => (offset > 0 ? \"-\" : \"\") + match.toLowerCase(),\n  );\n}\n","import { a, list, quote, type Atom, type Value } from \"./emacs\";\nimport { toKebabCase } from \"./utilities\";\n\n/**\n * Customization options for Org export engine.\n *\n * See the documentation for `ox` for more details.\n */\nexport type OrgExportCustomization = Partial<{\n  withSmartQuotes: boolean;\n  withEmphasize: boolean;\n  withSpecialStrings: boolean;\n  withFixedWidth: boolean;\n  withTimestamps: boolean;\n  preserveBreaks: boolean;\n  withSubSuperscripts: boolean | Atom;\n  withArchivedTrees: boolean | Atom;\n  expandLinks: boolean;\n  withBrokenLinks: boolean | Atom;\n  withClocks: boolean;\n  withCreator: boolean;\n  withDrawers: boolean;\n  withDate: boolean;\n  withEntities: boolean;\n  withEmail: boolean;\n  withFootnotes: boolean;\n  headlineLevels: number;\n  withInlinetasks: boolean;\n  withSectionNumbers: boolean | number;\n  withPlanning: boolean;\n  withPriority: boolean;\n  withProperties: boolean | Atom[];\n  withStatisticsCookies: boolean;\n  withTags: boolean | Atom;\n  withTasks: boolean | Atom;\n  withLatex: boolean | Atom;\n  timestampFile: boolean;\n  withTitle: boolean;\n  withToc: boolean;\n  todoKeywords: boolean;\n  withTables: boolean;\n}>;\n\n/**\n * Generate Emacs Lisp code to customize the Org export engine.\n */\nexport function customize(options: OrgExportCustomization = {}) {\n  const transformed = Object.entries(options).flatMap(([key, val]) => {\n    switch (key) {\n      case \"withProperties\": {\n        return [\n          a`org-export-with-properties`,\n          Array.isArray(val) ? quote(list(...val)) : val,\n        ]\n      }\n     \n      case \"withSmartQuotes\":\n      case \"withEmphasize\":\n      case \"withSpecialStrings\":\n      case \"withFixedWidth\":\n      case \"withTimestamps\":\n      case \"preserveBreaks\":\n      case \"withSubSuperscripts\":\n      case \"withArchivedTrees\":\n      case \"expandLinks\":\n      case \"withBrokenLinks\":\n      case \"withClocks\":\n      case \"withCreator\":\n      case \"withDrawers\":\n      case \"withDate\":\n      case \"withEntities\":\n      case \"withEmail\":\n      case \"withFootnotes\":\n      case \"headlineLevels\":\n      case \"withInlinetasks\":\n      case \"withSectionNumbers\":\n      case \"withPlanning\":\n      case \"withPriority\":\n      case \"withStatisticsCookies\":\n      case \"withTags\":\n      case \"withTasks\":\n      case \"withLatex\":\n      case \"timestampFile\":\n      case \"withTitle\":\n      case \"withToc\":\n      case \"todoKeywords\":\n      case \"withTables\":\n        return [a`org-export-${toKebabCase(key)}`, val as Value];\n\n      default:\n        return [];\n    }\n  });\n\n  return list(a`setq`, ...transformed);\n}\n","import { a, k, cons, list, quote, type Value } from \"./emacs\";\nimport { toKebabCase } from \"./utilities\";\n\n/**\n * Customization options for exporting Org documents as Svelte components.\n *\n * See the documentation for `ox-svelte` for more details.\n */\nexport type OrgSvelteCustomization = Partial<{\n  anchorFormat: `${string}%s${string}%s${string}`;\n  brokenLinkFormat: string;\n  componentImportAlist: Record<string, string | string[] | null>;\n  metadataExportList: string[];\n  imageFormat: `${string}%s${string}%s${string}`;\n  latexEnvironmentFormat: `${string}%s${string}`;\n  latexDisplayFragmentFormat: `${string}%s${string}`;\n  latexInlineFragmentFormat: `${string}%s${string}`;\n  linkOrgFileAsSvelte: boolean;\n  rawScriptContent: string;\n  srcBlockFormat: `${string}%s${string}%s${string}`;\n  textMarkupAlist: Record<\n    \"bold\" | \"code\" | \"italic\" | \"strike-through\" | \"underline\" | \"verbatim\",\n    `${string}%s${string}`\n  >;\n  verbose: boolean;\n}>;\n\n/**\n * Generate Emacs Lisp code to customize the Org to Svelte export engine.\n */\nexport function customize(options: OrgSvelteCustomization = {}) {\n  const transformed = Object.entries(options).flatMap(([key, val]) => {\n    switch (key) {\n      case \"componentImportAlist\": {\n        const cia = val as Record<string, string | string[] | null>;\n        return [\n          a`org-svelte-component-import-alist`,\n          quote(\n            list(\n              ...Object.entries(cia).map(([k, v]) => {\n                if (Array.isArray(v)) {\n                  return cons(k, list(...v));\n                } else {\n                  return cons(k, v);\n                }\n              }),\n            ),\n          ),\n        ];\n      }\n\n      case \"metadataExportList\": {\n        const mel = val as string[];\n        return [\n          a`org-svelte-metadata-export-list`,\n          quote(list(...mel.map((v) => k`${v}`))),\n        ];\n      }\n\n      case \"textMarkupAlist\": {\n        const tma = val as Record<\n          | \"bold\"\n          | \"code\"\n          | \"italic\"\n          | \"strike-through\"\n          | \"underline\"\n          | \"verbatim\",\n          `${string}%s${string}`\n        >;\n        return [\n          a`org-svelte-text-markup-alist`,\n          quote(\n            list(...Object.entries(tma).map(([key, val]) => cons(key, val))),\n          ),\n        ];\n      }\n\n      case \"anchorFormat\":\n      case \"brokenLinkFormat\":\n      case \"imageFormat\":\n      case \"latexEnvironmentFormat\":\n      case \"latexDisplayFragmentFormat\":\n      case \"latexInlineFragmentFormat\":\n      case \"linkOrgFileAsSvelte\":\n      case \"rawScriptContent\":\n      case \"srcBlockFormat\":\n      case \"verbose\":\n        return [a`org-svelte-${toKebabCase(key)}`, val as Value];\n\n      default:\n        return [];\n    }\n  });\n\n  return list(a`setq`, ...transformed);\n}\n\n/**\n * Export an Org document as Svelte code.\n *\n * Note: This function expects the content of the Org document to be provided\n * via minibuffer input (i.e., stdin).\n *\n * @param options Customization options for the export.\n * @returns The generated Svelte component as a string.\n */\nexport const exportMinibufferAsSvelte = list(\n  a`let`,\n  // VARLIST\n  list(list(a`content`, ``)),\n  // BODY\n  list(\n    a`while`,\n    // TEST\n    list(a`setq`, a`line`, list(a`ignore-errors`, list(a`read-string`, ``))),\n    // BODY\n    list(a`setq`, a`content`, list(a`concat`, a`content`, `\\\\n`, a`line`)),\n  ),\n  // Create temporary buffer, insert, and export.\n  list(\n    a`with-temp-buffer`,\n    list(a`org-mode`),\n    list(a`insert`, a`content`),\n    list(a`org-svelte-export-as-svelte`),\n    list(a`princ`, list(a`buffer-string`)),\n  ),\n);\n","import { mkdtempSync } from \"node:fs\";\nimport { tmpdir } from \"node:os\";\nimport { join } from \"node:path\";\n\nimport fullpath from \"ox-svelte\";\nimport type { PreprocessorGroup } from \"svelte/compiler\";\nimport { globSync } from \"tinyglobby\";\n\nimport { list, quote, a, Emacs, type Sexp } from \"./emacs\";\nimport {\n  customize as customizeOx,\n  type OrgExportCustomization,\n} from \"./org-export\";\nimport {\n  customize as customizeOxSvelte,\n  exportMinibufferAsSvelte,\n  type OrgSvelteCustomization,\n} from \"./org-svelte\";\n\n/**\n * Options for preprocessing Org documents to Svelte components.\n *\n * See the documentation for `ox` and `ox-svelte` for more details.\n */\nexport type OrgPreprocessOptions = Partial<{\n  /**\n   * List of file extensions to process as Org documents.\n   */\n  extensions: string[];\n\n  /**\n   * List of glob patterns to locate Org files for updating ID locations.\n   */\n  idLocations: string[];\n\n  /**\n   * Directory to use as Emacs `user-emacs-directory`.\n   */\n  initDirectory: string;\n\n  /**\n   * List of extra S-expressions to evaluate during initialization.\n   */\n  initSexps: Sexp[];\n}> &\n  OrgExportCustomization &\n  OrgSvelteCustomization;\n\n/**\n * Preprocess Org documents to Svelte components.\n */\nexport function orgPreprocess(\n  options?: OrgPreprocessOptions,\n): PreprocessorGroup {\n  const {\n    extensions = [\".org\"],\n    idLocations = [],\n    initDirectory = mkdtempSync(join(tmpdir(), \"svelte-preprocess-org-\")),\n    initSexps = [],\n    ...rest\n  } = options || {};\n\n  // Create a new Emacs instance for this preprocessor.\n  const emacs = new Emacs(initDirectory);\n\n  if (initSexps.length > 0) {\n    emacs.progn(...initSexps).run();\n  }\n\n  // Update Org-mode ID locations if provided.\n  if (idLocations.length > 0) {\n    const files = globSync(idLocations);\n    if (files.length > 0) {\n      emacs\n        .require(\"org\")\n        .progn(list(a`org-id-update-id-locations`, quote(list(...files))))\n        .run();\n    }\n  }\n\n  return {\n    markup({ content, filename }) {\n      // If the file extension is not in the list of extensions, do nothing.\n      if (filename && !extensions.some((ext) => filename.endsWith(ext))) {\n        return { code: content };\n      }\n\n      // Make sure that ID location updates have been applied.\n      const code = emacs\n        .require(\"ox-svelte\", fullpath)\n        .progn(customizeOx(rest))\n        .progn(customizeOxSvelte(rest))\n        .progn(exportMinibufferAsSvelte)\n        .minibuffer(content)\n        .run();\n      return { code };\n    },\n  };\n}\n\nexport default orgPreprocess;\n"],"mappings":";;;;;;;;;;;AA4CA,SAAgB,OAAO,GAAuB;AAC5C,QAAO,aAAa,UAAU,SAAS,KAAK,SAAS;;;;;AAMvD,SAAgB,OAAO,GAAuB;AAC5C,QAAO,aAAa,UAAU,UAAU;;;;;AAM1C,SAAgB,UAAU,GAA0B;AAClD,QAAO,aAAa,UAAU,aAAa;;;;;AAM7C,SAAgB,QAAQ,GAAwB;AAC9C,QAAO,aAAa,UAAU,WAAW;;;;;AAqB3C,SAAgB,MAAM,GAAuB;AAC3C,QAAO,MAAM;;;;;AAef,SAAgB,SAAS,GAAyB;AAChD,QAAO,OAAO,MAAM;;;;;AAMtB,SAAgB,SAAS,GAAyB;AAChD,QAAO,OAAO,MAAM;;;;;AAMtB,SAAgB,UAAU,GAA0B;AAClD,QAAO,OAAO,MAAM;;;;;AAMtB,SAAgB,KAAK,KAAW,KAAiB;AAC/C,QAAO;EAAE;EAAK;EAAK;;;;;AAMrB,SAAgB,MAAM,MAA6B;AACjD,KAAI,UAAU,KAAK,CAEjB,QAAO,CAAC,GAAG,KAAK;KAGhB,QAAO,EAAE,OAAO,MAAM;;;;;AAO1B,SAAgB,KAAK,GAAG,MAAoB;AAC1C,KAAI,KAAK,WAAW,EAClB,QAAO;CAGT,MAAM,CAAC,KAAK,GAAG,QAAQ;AACvB,QAAO,KAAK,KAAK,KAAK,GAAG,KAAK,CAAC;;;;;AAMjC,SAAgB,EACd,KACA,GAAG,eACG;AACN,QAAO,EAAE,MAAM,OAAO,IAAI,EAAE,KAAK,EAAE,GAAG,cAAc,EAAE;;;;;AAMxD,SAAgB,EACd,KACA,GAAG,eACM;AACT,QAAO,EAAE,SAAS,OAAO,IAAI,EAAE,KAAK,EAAE,GAAG,cAAc,EAAE;;;;;AAM3D,SAAgB,UAAU,MAAoB;AAE5C,SAAQ,MAAR;EACE,KAAK,OAAO,KAAK,CACf,QAAO,IAAI,cAAc,KAAK,CAAC;EACjC,KAAK,MAAM,KAAK,CACd,QAAO;EACT,KAAK,SAAS,KAAK,CACjB,QAAO,IAAI,KAAK;EAClB,KAAK,SAAS,KAAK,CACjB,QAAO,KAAK,UAAU;EACxB,KAAK,UAAU,KAAK,CAClB,QAAO,OAAO,MAAM;EACtB,KAAK,OAAO,KAAK,CACf,QAAO,KAAK;EACd,KAAK,UAAU,KAAK,CAClB,QAAO,IAAI,KAAK;EAClB,KAAK,QAAQ,KAAK,CAChB,QAAO,IAAI,UAAU,KAAK,MAAM;EAClC,QACE,OAAM,IAAI,UAAU,iCAAiC,OAAO,OAAO;;;;;;AAOzE,SAAS,cAAc,QAAoB;CAEzC,IAAI,SAAS;AACb,KAAI,OAAOA,OAAK,IAAI,CAClB,WAAU,IAAI,cAAcA,OAAK,IAAI,CAAC;KAEtC,WAAU,UAAUA,OAAK,IAAI;AAO/B,KAAI,OAAOA,OAAK,IAAI,CAClB,WAAU,IAAI,cAAcA,OAAK,IAAI;UAC5B,MAAMA,OAAK,IAAI,CACxB,QAAO;KAEP,WAAU,MAAM,UAAUA,OAAK,IAAI;AAGrC,QAAO;;;;;;;;;;AAWT,IAAa,QAAb,MAAmB;;;;CAIjB,AAAQ,QAAgB,EAAE;;;;CAK1B,AAAQ;;;;;;;;;CAUR,YAAY,AAAQC,eAAuB;EAAvB;AAClB,OAAK,QAAQ;;;;;;;;CASf,QAAQ,SAAiB,UAAmB;AAC1C,OAAK,MAAM,KACT,WACI,KAAK,CAAC,WAAW,MAAM,CAAC,GAAG,UAAU,EAAE,SAAS,GAChD,KAAK,CAAC,WAAW,MAAM,CAAC,GAAG,UAAU,CAAC,CAC3C;AAED,SAAO;;;;;;;;CAST,MAAM,GAAG,OAAe;AACtB,OAAK,MAAM,KAAK,GAAG,MAAM;AAEzB,SAAO;;;;;;;;CAST,WAAW,SAAiB;AAC1B,OAAK,QAAQ;AAEb,SAAO;;;;;;;CAQT,MAAM;EAEJ,MAAM,EAAE,QAAQ,QAAQ,UAAU,UAChC,SACA;GACE,oBAAoB,KAAK;GACzB;GACA;GACA,UAAU,KAAK,CAAC,SAAS,GAAG,KAAK,MAAM,CAAC;GACzC,EACD,EACE,OAAO,KAAK,OACb,CACF;AACD,MAAI,MACF,OAAM,IAAI,MAAM,wBAAwB,UAAU,EAAE,OAAO,OAAO,CAAC;AAIrE,OAAK,QAAQ,EAAE;AACf,OAAK,QAAQ;AAGb,SAAO,OAAO,UAAU;;;;;;;;;;;;AChU5B,SAAgB,YAAY,GAAmB;AAC7C,QAAO,EAAE,QACP,yBACC,OAAO,YAAY,SAAS,IAAI,MAAM,MAAM,MAAM,aAAa,CACjE;;;;;;;;ACoCH,SAAgB,UAAU,UAAkC,EAAE,EAAE;CAC9D,MAAM,cAAc,OAAO,QAAQ,QAAQ,CAAC,SAAS,CAAC,KAAK,SAAS;AAClE,UAAQ,KAAR;GACE,KAAK,iBACH,QAAO,CACL,CAAC,8BACD,MAAM,QAAQ,IAAI,GAAG,MAAM,KAAK,GAAG,IAAI,CAAC,GAAG,IAC5C;GAGH,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK,aACH,QAAO,CAAC,CAAC,cAAc,YAAY,IAAI,IAAI,IAAa;GAE1D,QACE,QAAO,EAAE;;GAEb;AAEF,QAAO,KAAK,CAAC,QAAQ,GAAG,YAAY;;;;;;;;AChEtC,SAAgBC,YAAU,UAAkC,EAAE,EAAE;CAC9D,MAAM,cAAc,OAAO,QAAQ,QAAQ,CAAC,SAAS,CAAC,KAAK,SAAS;AAClE,UAAQ,KAAR;GACE,KAAK,wBAAwB;IAC3B,MAAM,MAAM;AACZ,WAAO,CACL,CAAC,qCACD,MACE,KACE,GAAG,OAAO,QAAQ,IAAI,CAAC,KAAK,CAACC,KAAG,OAAO;AACrC,SAAI,MAAM,QAAQ,EAAE,CAClB,QAAO,KAAKA,KAAG,KAAK,GAAG,EAAE,CAAC;SAE1B,QAAO,KAAKA,KAAG,EAAE;MAEnB,CACH,CACF,CACF;;GAGH,KAAK,sBAAsB;IACzB,MAAM,MAAM;AACZ,WAAO,CACL,CAAC,mCACD,MAAM,KAAK,GAAG,IAAI,KAAK,MAAM,CAAC,GAAG,IAAI,CAAC,CAAC,CACxC;;GAGH,KAAK,mBAAmB;IACtB,MAAM,MAAM;AASZ,WAAO,CACL,CAAC,gCACD,MACE,KAAK,GAAG,OAAO,QAAQ,IAAI,CAAC,KAAK,CAACC,OAAKC,WAAS,KAAKD,OAAKC,MAAI,CAAC,CAAC,CACjE,CACF;;GAGH,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK,UACH,QAAO,CAAC,CAAC,cAAc,YAAY,IAAI,IAAI,IAAa;GAE1D,QACE,QAAO,EAAE;;GAEb;AAEF,QAAO,KAAK,CAAC,QAAQ,GAAG,YAAY;;;;;;;;;;;AAYtC,MAAa,2BAA2B,KACtC,CAAC,OAED,KAAK,KAAK,CAAC,WAAW,GAAG,CAAC,EAE1B,KACE,CAAC,SAED,KAAK,CAAC,QAAQ,CAAC,QAAQ,KAAK,CAAC,iBAAiB,KAAK,CAAC,eAAe,GAAG,CAAC,CAAC,EAExE,KAAK,CAAC,QAAQ,CAAC,WAAW,KAAK,CAAC,UAAU,CAAC,WAAW,OAAO,CAAC,OAAO,CAAC,CACvE,EAED,KACE,CAAC,oBACD,KAAK,CAAC,WAAW,EACjB,KAAK,CAAC,UAAU,CAAC,UAAU,EAC3B,KAAK,CAAC,8BAA8B,EACpC,KAAK,CAAC,SAAS,KAAK,CAAC,gBAAgB,CAAC,CACvC,CACF;;;;;;;AC3ED,SAAgB,cACd,SACmB;CACnB,MAAM,EACJ,aAAa,CAAC,OAAO,EACrB,cAAc,EAAE,EAChB,gBAAgB,YAAY,KAAK,QAAQ,EAAE,yBAAyB,CAAC,EACrE,YAAY,EAAE,CACd,GAAG,SACD,WAAW,EAAE;CAGjB,MAAM,QAAQ,IAAI,MAAM,cAAc;AAEtC,KAAI,UAAU,SAAS,EACrB,OAAM,MAAM,GAAG,UAAU,CAAC,KAAK;AAIjC,KAAI,YAAY,SAAS,GAAG;EAC1B,MAAM,QAAQ,SAAS,YAAY;AACnC,MAAI,MAAM,SAAS,EACjB,OACG,QAAQ,MAAM,CACd,MAAM,KAAK,CAAC,8BAA8B,MAAM,KAAK,GAAG,MAAM,CAAC,CAAC,CAAC,CACjE,KAAK;;AAIZ,QAAO,EACL,OAAO,EAAE,SAAS,YAAY;AAE5B,MAAI,YAAY,CAAC,WAAW,MAAM,QAAQ,SAAS,SAAS,IAAI,CAAC,CAC/D,QAAO,EAAE,MAAM,SAAS;AAW1B,SAAO,EAAE,MAPI,MACV,QAAQ,aAAa,SAAS,CAC9B,MAAMC,UAAY,KAAK,CAAC,CACxB,MAAMC,YAAkB,KAAK,CAAC,CAC9B,MAAM,yBAAyB,CAC/B,WAAW,QAAQ,CACnB,KAAK,EACO;IAElB;;AAGH,kBAAe"}
+{"version":3,"file":"index.js","names":["customize","customizeOx","customizeOxSvelte"],"sources":["../src/emacs.ts","../src/utilities.ts","../src/org-export.ts","../src/org-svelte.ts","../src/index.ts"],"sourcesContent":["import { spawnSync } from \"node:child_process\";\n\n/**\n * Options for starting an Emacs intsance.\n */\nexport type EmacsCustomization = {\n  /**\n   * Directory to use as Emacs `user-emacs-directory`.\n   */\n  initDirectory: string;\n\n  /**\n   * Largest amount of data in bytes allowed on stdout or stderr.\n   */\n  maxBuffer: number;\n};\n\n/**\n * An S-expression.\n */\nexport type Sexp = Value | Cell;\n\n/**\n * A value in an S-expression.\n */\nexport type Value = Atom | Keyword | Quote | string | number | boolean | null;\n\n/**\n * A cons cell.\n */\nexport type Cell = {\n  car: Sexp;\n  cdr: Sexp;\n};\n\n/**\n * An atom in an S-expression.\n */\nexport type Atom = {\n  atom: string;\n};\n\n/**\n * A keyword in an S-expression.\n */\nexport type Keyword = {\n  keyword: string;\n};\n\n/**\n * A quoted S-expression.\n */\nexport type Quote = {\n  quote: Sexp;\n};\n\n/**\n * Check if a value is a cons cell.\n */\nexport function isCell(x: unknown): x is Cell {\n  return x instanceof Object && \"car\" in x && \"cdr\" in x;\n}\n\n/**\n * Check if a value is an atom.\n */\nexport function isAtom(x: unknown): x is Atom {\n  return x instanceof Object && \"atom\" in x;\n}\n\n/**\n * Check if a value is a keyword.\n */\nexport function isKeyword(x: unknown): x is Keyword {\n  return x instanceof Object && \"keyword\" in x;\n}\n\n/**\n * Check if a value is a quoted S-expression.\n */\nexport function isQuote(x: unknown): x is Quote {\n  return x instanceof Object && \"quote\" in x;\n}\n\n/**\n * Check if a value is a valid value in an S-expression.\n */\nexport function isValue(x: unknown): x is Value {\n  return (\n    isAtom(x) ||\n    isKeyword(x) ||\n    isQuote(x) ||\n    isString(x) ||\n    isNumber(x) ||\n    isBoolean(x) ||\n    isNil(x)\n  );\n}\n\n/**\n * Check if a value is a nil value\n */\nexport function isNil(x: unknown): x is null {\n  return x === null;\n}\n\n/**\n * Check if a value is a list.\n *\n * Note that improper lists are also considered lists.\n */\nexport function isList(x: unknown): x is Cell {\n  return isCell(x) || isNil(x);\n}\n\n/**\n * Check if a value is a string.\n */\nexport function isString(x: unknown): x is string {\n  return typeof x === \"string\";\n}\n\n/**\n * Check if a value is a number.\n */\nexport function isNumber(x: unknown): x is number {\n  return typeof x === \"number\";\n}\n\n/**\n * Check if a value is a boolean.\n */\nexport function isBoolean(x: unknown): x is boolean {\n  return typeof x === \"boolean\";\n}\n\n/**\n * Create a cons cell.\n */\nexport function cons(car: Sexp, cdr: Sexp): Cell {\n  return { car, cdr };\n}\n\n/**\n * Create a quoted S-expression.\n */\nexport function quote(sexp: Sexp): Quote | Keyword {\n  if (isKeyword(sexp)) {\n    // A quoted keyword is still a keyword.\n    return k`${sexp.keyword}`;\n  } else {\n    // For the rest, just quote the S-expression.\n    return { quote: sexp };\n  }\n}\n\n/**\n * Create a list from a sequence of S-expressions.\n */\nexport function list(...args: Sexp[]): Sexp {\n  if (args.length === 0) {\n    return null;\n  }\n\n  const [car, ...rest] = args;\n  return cons(car, list(...rest));\n}\n\n/**\n * Create an atom from a tagged template string.\n */\nexport function a(\n  raw: TemplateStringsArray,\n  ...substitutions: unknown[]\n): Atom {\n  return { atom: String.raw({ raw }, ...substitutions) };\n}\n\n/**\n * Create a keyword from a tagged template string.\n */\nexport function k(\n  raw: TemplateStringsArray,\n  ...substitutions: unknown[]\n): Keyword {\n  return { keyword: String.raw({ raw }, ...substitutions) };\n}\n\n/**\n * Convert an S-expression to a string.\n */\nexport function stringify(sexp: Sexp): string {\n  // Dispatch based on the type of the expression.\n  switch (true) {\n    case isCell(sexp):\n      return `(${stringifyList(sexp)})`;\n    case isNil(sexp):\n      return \"nil\";\n    case isString(sexp):\n      return `\"${sexp}\"`;\n    case isNumber(sexp):\n      return sexp.toString();\n    case isBoolean(sexp):\n      return sexp ? \"t\" : \"nil\";\n    case isAtom(sexp):\n      return sexp.atom;\n    case isKeyword(sexp):\n      return `:${sexp.keyword}`;\n    case isQuote(sexp):\n      return `'${stringify(sexp.quote)}`;\n    default:\n      throw new TypeError(`Unknown type of S-expression: ${typeof sexp}`);\n  }\n}\n\n/**\n * Convert a list to a string.\n */\nfunction stringifyList(list: Cell): string {\n  // Stringify the car of the list.\n  let result = \"\";\n  if (isCell(list.car)) {\n    result += `(${stringifyList(list.car)})`;\n  } else {\n    result += stringify(list.car);\n  }\n\n  // There are three cases for a cdr:\n  // 1. cdr is another cell -> recursively stringify the cdr\n  // 2. cdr is nil -> end of the list, so just return the result\n  // 3. cdr is something else -> add a dot and the stringified cdr\n  if (isCell(list.cdr)) {\n    result += ` ${stringifyList(list.cdr)}`;\n  } else if (isNil(list.cdr)) {\n    return result;\n  } else {\n    result += ` . ${stringify(list.cdr)}`;\n  }\n\n  return result;\n}\n\n/**\n * An Emacs instance for evaluating S-expressions.\n *\n * Since each Emacs instance constructetd from this class is assigned their own\n * temporary directory as their init directory, any persistent state that needs\n * to be preserved between evaluations can be stored in that directory (e.g. in\n * the .eld files).\n */\nexport class Emacs {\n  /**\n   * Directory that will be used as the `user-emacs-directory`.\n   */\n  private initDirectory: string;\n\n  /**\n   * Largest amount of data in bytes allowed on stdout or stderr.\n   */\n  private maxBuffer: number;\n\n  /**\n   * S-expression to evaluate when `run` method is called.\n   */\n  private sexps: Sexp[] = [];\n\n  /**\n   * String value to be piped into the standard input.\n   */\n  private stdin: string = \"\";\n\n  /**\n   * Initialize a new Emacs instance.\n   *\n   * Internally, this will request a temporary directory to be created, which\n   * will be used as the Emacs init directory when `Emacs.run` is called.\n   *\n   * @param initDirectory -\n   */\n  constructor(opts: EmacsCustomization) {\n    this.initDirectory = opts.initDirectory;\n    this.maxBuffer = opts.maxBuffer;\n  }\n\n  /**\n   * Register the features/packages to require.\n   *\n   * This function will append to the previous value.\n   * The `run` call will not reset this value.\n   */\n  require(feature: string, filename?: string) {\n    this.sexps.push(\n      filename\n        ? list(a`require`, quote(a`${feature}`), filename)\n        : list(a`require`, quote(a`${feature}`)),\n    );\n\n    return this;\n  }\n\n  /**\n   * Register S-expressions to evaluate.\n   *\n   * This function will append to the previous value.\n   * The `run` call will reset this value.\n   */\n  progn(...sexps: Sexp[]) {\n    this.sexps.push(...sexps);\n\n    return this;\n  }\n\n  /**\n   * Register the string to be fed into the standard input.\n   *\n   * This function will replace the previous value.\n   * The `run` call will reset this value.\n   */\n  minibuffer(content: string) {\n    this.stdin = content;\n\n    return this;\n  }\n\n  /**\n   * Run the registered S-expressions in Emacs.\n   *\n   * @rehturns The standard output of the Emacs process.\n   */\n  run() {\n    // Spawn Emacs in batch mode to evaluate the S-expressions.\n    const { stdout, stderr, error } = spawnSync(\n      \"emacs\",\n      [\n        `--init-directory=${this.initDirectory}`,\n        \"--batch\",\n        \"--eval\",\n        stringify(list(a`progn`, ...this.sexps)),\n      ],\n      {\n        input: this.stdin,\n        maxBuffer: this.maxBuffer,\n      },\n    );\n    if (error) {\n      throw new Error(`Error running Emacs: ${stderr}`, { cause: error });\n    }\n\n    // Reset the S-expressions and stdin for the next run.\n    this.sexps = [];\n    this.stdin = \"\";\n\n    // Return the standard output.\n    return stdout.toString();\n  }\n}\n","/**\n * Convert a lowerCamelCase string to kebab case.\n *\n * @param s The string to convert.\n * @returns The kebab-cased string.\n */\nexport function toKebabCase(s: string): string {\n  return s.replace(\n    /[A-Z]+(?!a-z)|[A-Z]/g,\n    (match, offset) => (offset > 0 ? \"-\" : \"\") + match.toLowerCase(),\n  );\n}\n","import { a, list, quote, type Atom, type Value } from \"./emacs\";\nimport { toKebabCase } from \"./utilities\";\n\n/**\n * Customization options for Org export engine.\n *\n * See the documentation for `ox` for more details.\n */\nexport type OrgExportCustomization = Partial<{\n  withSmartQuotes: boolean;\n  withEmphasize: boolean;\n  withSpecialStrings: boolean;\n  withFixedWidth: boolean;\n  withTimestamps: boolean;\n  preserveBreaks: boolean;\n  withSubSuperscripts: boolean | Atom;\n  withArchivedTrees: boolean | Atom;\n  expandLinks: boolean;\n  withBrokenLinks: boolean | Atom;\n  withClocks: boolean;\n  withCreator: boolean;\n  withDrawers: boolean;\n  withDate: boolean;\n  withEntities: boolean;\n  withEmail: boolean;\n  withFootnotes: boolean;\n  headlineLevels: number;\n  withInlinetasks: boolean;\n  withSectionNumbers: boolean | number;\n  withPlanning: boolean;\n  withPriority: boolean;\n  withProperties: boolean | Atom[];\n  withStatisticsCookies: boolean;\n  withTags: boolean | Atom;\n  withTasks: boolean | Atom;\n  withLatex: boolean | Atom;\n  timestampFile: boolean;\n  withTitle: boolean;\n  withToc: boolean;\n  todoKeywords: boolean;\n  withTables: boolean;\n}>;\n\n/**\n * Generate Emacs Lisp code to customize the Org export engine.\n */\nexport function customize(options: OrgExportCustomization = {}) {\n  const transformed = Object.entries(options).flatMap(([key, val]) => {\n    switch (key) {\n      case \"withProperties\": {\n        return [\n          a`org-export-with-properties`,\n          Array.isArray(val) ? quote(list(...val)) : val,\n        ];\n      }\n\n      case \"withSmartQuotes\":\n      case \"withEmphasize\":\n      case \"withSpecialStrings\":\n      case \"withFixedWidth\":\n      case \"withTimestamps\":\n      case \"preserveBreaks\":\n      case \"withSubSuperscripts\":\n      case \"withArchivedTrees\":\n      case \"expandLinks\":\n      case \"withBrokenLinks\":\n      case \"withClocks\":\n      case \"withCreator\":\n      case \"withDrawers\":\n      case \"withDate\":\n      case \"withEntities\":\n      case \"withEmail\":\n      case \"withFootnotes\":\n      case \"headlineLevels\":\n      case \"withInlinetasks\":\n      case \"withSectionNumbers\":\n      case \"withPlanning\":\n      case \"withPriority\":\n      case \"withStatisticsCookies\":\n      case \"withTags\":\n      case \"withTasks\":\n      case \"withLatex\":\n      case \"timestampFile\":\n      case \"withTitle\":\n      case \"withToc\":\n      case \"todoKeywords\":\n      case \"withTables\":\n        return [a`org-export-${toKebabCase(key)}`, val as Value];\n\n      default:\n        return [];\n    }\n  });\n\n  return list(a`setq`, ...transformed);\n}\n","import { a, k, cons, list, quote, type Value } from \"./emacs\";\nimport { toKebabCase } from \"./utilities\";\n\n/**\n * Customization options for exporting Org documents as Svelte components.\n *\n * See the documentation for `ox-svelte` for more details.\n */\nexport type OrgSvelteCustomization = Partial<{\n  anchorFormat: `${string}%s${string}%s${string}`;\n  brokenLinkFormat: string;\n  componentImportAlist: Record<string, string | string[] | null>;\n  metadataExportList: string[];\n  imageFormat: `${string}%s${string}%s${string}`;\n  latexEnvironmentFormat: `${string}%s${string}`;\n  latexDisplayFragmentFormat: `${string}%s${string}`;\n  latexInlineFragmentFormat: `${string}%s${string}`;\n  linkOrgFileAsSvelte: boolean;\n  rawScriptContent: string;\n  srcBlockFormat: `${string}%s${string}%s${string}`;\n  textMarkupAlist: Record<\n    \"bold\" | \"code\" | \"italic\" | \"strike-through\" | \"underline\" | \"verbatim\",\n    `${string}%s${string}`\n  >;\n  verbose: boolean;\n}>;\n\n/**\n * Generate Emacs Lisp code to customize the Org to Svelte export engine.\n */\nexport function customize(options: OrgSvelteCustomization = {}) {\n  const transformed = Object.entries(options).flatMap(([key, val]) => {\n    switch (key) {\n      case \"componentImportAlist\": {\n        const cia = val as Record<string, string | string[] | null>;\n        return [\n          a`org-svelte-component-import-alist`,\n          quote(\n            list(\n              ...Object.entries(cia).map(([k, v]) => {\n                if (Array.isArray(v)) {\n                  return cons(k, list(...v));\n                } else {\n                  return cons(k, v);\n                }\n              }),\n            ),\n          ),\n        ];\n      }\n\n      case \"metadataExportList\": {\n        const mel = val as string[];\n        return [\n          a`org-svelte-metadata-export-list`,\n          quote(list(...mel.map((v) => k`${v}`))),\n        ];\n      }\n\n      case \"textMarkupAlist\": {\n        const tma = val as Record<\n          | \"bold\"\n          | \"code\"\n          | \"italic\"\n          | \"strike-through\"\n          | \"underline\"\n          | \"verbatim\",\n          `${string}%s${string}`\n        >;\n        return [\n          a`org-svelte-text-markup-alist`,\n          quote(\n            list(...Object.entries(tma).map(([key, val]) => cons(key, val))),\n          ),\n        ];\n      }\n\n      case \"anchorFormat\":\n      case \"brokenLinkFormat\":\n      case \"imageFormat\":\n      case \"latexEnvironmentFormat\":\n      case \"latexDisplayFragmentFormat\":\n      case \"latexInlineFragmentFormat\":\n      case \"linkOrgFileAsSvelte\":\n      case \"rawScriptContent\":\n      case \"srcBlockFormat\":\n      case \"verbose\":\n        return [a`org-svelte-${toKebabCase(key)}`, val as Value];\n\n      default:\n        return [];\n    }\n  });\n\n  return list(a`setq`, ...transformed);\n}\n\n/**\n * Export an Org document as Svelte code.\n *\n * Note: This function expects the content of the Org document to be provided\n * via minibuffer input (i.e., stdin).\n *\n * @param options Customization options for the export.\n * @returns The generated Svelte component as a string.\n */\nexport const exportMinibufferAsSvelte = list(\n  a`let`,\n  // VARLIST\n  list(list(a`content`, ``)),\n  // BODY\n  list(\n    a`while`,\n    // TEST\n    list(a`setq`, a`line`, list(a`ignore-errors`, list(a`read-string`, ``))),\n    // BODY\n    list(a`setq`, a`content`, list(a`concat`, a`content`, `\\\\n`, a`line`)),\n  ),\n  // Create temporary buffer, insert, and export.\n  list(\n    a`with-temp-buffer`,\n    list(a`org-mode`),\n    list(a`insert`, a`content`),\n    list(a`org-svelte-export-as-svelte`),\n    list(a`princ`, list(a`buffer-string`)),\n  ),\n);\n","import { mkdtempSync } from \"node:fs\";\nimport { tmpdir } from \"node:os\";\nimport { join } from \"node:path\";\n\nimport fullpath from \"ox-svelte\";\nimport type { PreprocessorGroup } from \"svelte/compiler\";\nimport { globSync } from \"tinyglobby\";\n\nimport {\n  list,\n  quote,\n  a,\n  Emacs,\n  type Sexp,\n  type EmacsCustomization,\n} from \"./emacs\";\nimport {\n  customize as customizeOx,\n  type OrgExportCustomization,\n} from \"./org-export\";\nimport {\n  customize as customizeOxSvelte,\n  exportMinibufferAsSvelte,\n  type OrgSvelteCustomization,\n} from \"./org-svelte\";\n\n/**\n * Options for preprocessing Org documents to Svelte components.\n *\n * See the documentation for `ox` and `ox-svelte` for more details.\n */\nexport type OrgPreprocessOptions = Partial<{\n  /**\n   * List of file extensions to process as Org documents.\n   */\n  extensions: string[];\n\n  /**\n   * List of glob patterns to locate Org files for updating ID locations.\n   */\n  idLocations: string[];\n\n  /**\n   * List of extra S-expressions to evaluate during initialization.\n   */\n  initSexps: Sexp[];\n}> &\n  EmacsCustomization &\n  OrgExportCustomization &\n  OrgSvelteCustomization;\n\n/**\n * Preprocess Org documents to Svelte components.\n */\nexport function orgPreprocess(\n  options?: OrgPreprocessOptions,\n): PreprocessorGroup {\n  const {\n    extensions = [\".org\"],\n    idLocations = [],\n    initDirectory = mkdtempSync(join(tmpdir(), \"svelte-preprocess-org-\")),\n    initSexps = [],\n    maxBuffer = 10 * 1024 * 1024, // 10 MiB\n    ...rest\n  } = options || {};\n\n  // Create a new Emacs instance for this preprocessor.\n  const emacs = new Emacs({\n    initDirectory,\n    maxBuffer,\n  });\n\n  if (initSexps.length > 0) {\n    emacs.progn(...initSexps).run();\n  }\n\n  // Update Org-mode ID locations if provided.\n  if (idLocations.length > 0) {\n    const files = globSync(idLocations);\n    if (files.length > 0) {\n      emacs\n        .require(\"org\")\n        .progn(list(a`org-id-update-id-locations`, quote(list(...files))))\n        .run();\n    }\n  }\n\n  return {\n    markup({ content, filename }) {\n      // If the file extension is not in the list of extensions, do nothing.\n      if (filename && !extensions.some((ext) => filename.endsWith(ext))) {\n        return { code: content };\n      }\n\n      // Make sure that ID location updates have been applied.\n      const code = emacs\n        .require(\"ox-svelte\", fullpath)\n        .progn(customizeOx(rest))\n        .progn(customizeOxSvelte(rest))\n        .progn(exportMinibufferAsSvelte)\n        .minibuffer(content)\n        .run();\n      return { code };\n    },\n  };\n}\n\nexport default orgPreprocess;\n"],"mappings":";;;;;;;;;;;AA2DA,SAAgB,OAAO,GAAuB;AAC5C,QAAO,aAAa,UAAU,SAAS,KAAK,SAAS;;;;;AAMvD,SAAgB,OAAO,GAAuB;AAC5C,QAAO,aAAa,UAAU,UAAU;;;;;AAM1C,SAAgB,UAAU,GAA0B;AAClD,QAAO,aAAa,UAAU,aAAa;;;;;AAM7C,SAAgB,QAAQ,GAAwB;AAC9C,QAAO,aAAa,UAAU,WAAW;;;;;AAqB3C,SAAgB,MAAM,GAAuB;AAC3C,QAAO,MAAM;;;;;AAef,SAAgB,SAAS,GAAyB;AAChD,QAAO,OAAO,MAAM;;;;;AAMtB,SAAgB,SAAS,GAAyB;AAChD,QAAO,OAAO,MAAM;;;;;AAMtB,SAAgB,UAAU,GAA0B;AAClD,QAAO,OAAO,MAAM;;;;;AAMtB,SAAgB,KAAK,KAAW,KAAiB;AAC/C,QAAO;EAAE;EAAK;EAAK;;;;;AAMrB,SAAgB,MAAM,MAA6B;AACjD,KAAI,UAAU,KAAK,CAEjB,QAAO,CAAC,GAAG,KAAK;KAGhB,QAAO,EAAE,OAAO,MAAM;;;;;AAO1B,SAAgB,KAAK,GAAG,MAAoB;AAC1C,KAAI,KAAK,WAAW,EAClB,QAAO;CAGT,MAAM,CAAC,KAAK,GAAG,QAAQ;AACvB,QAAO,KAAK,KAAK,KAAK,GAAG,KAAK,CAAC;;;;;AAMjC,SAAgB,EACd,KACA,GAAG,eACG;AACN,QAAO,EAAE,MAAM,OAAO,IAAI,EAAE,KAAK,EAAE,GAAG,cAAc,EAAE;;;;;AAMxD,SAAgB,EACd,KACA,GAAG,eACM;AACT,QAAO,EAAE,SAAS,OAAO,IAAI,EAAE,KAAK,EAAE,GAAG,cAAc,EAAE;;;;;AAM3D,SAAgB,UAAU,MAAoB;AAE5C,SAAQ,MAAR;EACE,KAAK,OAAO,KAAK,CACf,QAAO,IAAI,cAAc,KAAK,CAAC;EACjC,KAAK,MAAM,KAAK,CACd,QAAO;EACT,KAAK,SAAS,KAAK,CACjB,QAAO,IAAI,KAAK;EAClB,KAAK,SAAS,KAAK,CACjB,QAAO,KAAK,UAAU;EACxB,KAAK,UAAU,KAAK,CAClB,QAAO,OAAO,MAAM;EACtB,KAAK,OAAO,KAAK,CACf,QAAO,KAAK;EACd,KAAK,UAAU,KAAK,CAClB,QAAO,IAAI,KAAK;EAClB,KAAK,QAAQ,KAAK,CAChB,QAAO,IAAI,UAAU,KAAK,MAAM;EAClC,QACE,OAAM,IAAI,UAAU,iCAAiC,OAAO,OAAO;;;;;;AAOzE,SAAS,cAAc,MAAoB;CAEzC,IAAI,SAAS;AACb,KAAI,OAAO,KAAK,IAAI,CAClB,WAAU,IAAI,cAAc,KAAK,IAAI,CAAC;KAEtC,WAAU,UAAU,KAAK,IAAI;AAO/B,KAAI,OAAO,KAAK,IAAI,CAClB,WAAU,IAAI,cAAc,KAAK,IAAI;UAC5B,MAAM,KAAK,IAAI,CACxB,QAAO;KAEP,WAAU,MAAM,UAAU,KAAK,IAAI;AAGrC,QAAO;;;;;;;;;;AAWT,IAAa,QAAb,MAAmB;;;;CAIjB,AAAQ;;;;CAKR,AAAQ;;;;CAKR,AAAQ,QAAgB,EAAE;;;;CAK1B,AAAQ,QAAgB;;;;;;;;;CAUxB,YAAY,MAA0B;AACpC,OAAK,gBAAgB,KAAK;AAC1B,OAAK,YAAY,KAAK;;;;;;;;CASxB,QAAQ,SAAiB,UAAmB;AAC1C,OAAK,MAAM,KACT,WACI,KAAK,CAAC,WAAW,MAAM,CAAC,GAAG,UAAU,EAAE,SAAS,GAChD,KAAK,CAAC,WAAW,MAAM,CAAC,GAAG,UAAU,CAAC,CAC3C;AAED,SAAO;;;;;;;;CAST,MAAM,GAAG,OAAe;AACtB,OAAK,MAAM,KAAK,GAAG,MAAM;AAEzB,SAAO;;;;;;;;CAST,WAAW,SAAiB;AAC1B,OAAK,QAAQ;AAEb,SAAO;;;;;;;CAQT,MAAM;EAEJ,MAAM,EAAE,QAAQ,QAAQ,UAAU,UAChC,SACA;GACE,oBAAoB,KAAK;GACzB;GACA;GACA,UAAU,KAAK,CAAC,SAAS,GAAG,KAAK,MAAM,CAAC;GACzC,EACD;GACE,OAAO,KAAK;GACZ,WAAW,KAAK;GACjB,CACF;AACD,MAAI,MACF,OAAM,IAAI,MAAM,wBAAwB,UAAU,EAAE,OAAO,OAAO,CAAC;AAIrE,OAAK,QAAQ,EAAE;AACf,OAAK,QAAQ;AAGb,SAAO,OAAO,UAAU;;;;;;;;;;;;AC3V5B,SAAgB,YAAY,GAAmB;AAC7C,QAAO,EAAE,QACP,yBACC,OAAO,YAAY,SAAS,IAAI,MAAM,MAAM,MAAM,aAAa,CACjE;;;;;;;;ACoCH,SAAgBA,YAAU,UAAkC,EAAE,EAAE;CAC9D,MAAM,cAAc,OAAO,QAAQ,QAAQ,CAAC,SAAS,CAAC,KAAK,SAAS;AAClE,UAAQ,KAAR;GACE,KAAK,iBACH,QAAO,CACL,CAAC,8BACD,MAAM,QAAQ,IAAI,GAAG,MAAM,KAAK,GAAG,IAAI,CAAC,GAAG,IAC5C;GAGH,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK,aACH,QAAO,CAAC,CAAC,cAAc,YAAY,IAAI,IAAI,IAAa;GAE1D,QACE,QAAO,EAAE;;GAEb;AAEF,QAAO,KAAK,CAAC,QAAQ,GAAG,YAAY;;;;;;;;AChEtC,SAAgB,UAAU,UAAkC,EAAE,EAAE;CAC9D,MAAM,cAAc,OAAO,QAAQ,QAAQ,CAAC,SAAS,CAAC,KAAK,SAAS;AAClE,UAAQ,KAAR;GACE,KAAK,wBAAwB;IAC3B,MAAM,MAAM;AACZ,WAAO,CACL,CAAC,qCACD,MACE,KACE,GAAG,OAAO,QAAQ,IAAI,CAAC,KAAK,CAAC,GAAG,OAAO;AACrC,SAAI,MAAM,QAAQ,EAAE,CAClB,QAAO,KAAK,GAAG,KAAK,GAAG,EAAE,CAAC;SAE1B,QAAO,KAAK,GAAG,EAAE;MAEnB,CACH,CACF,CACF;;GAGH,KAAK,sBAAsB;IACzB,MAAM,MAAM;AACZ,WAAO,CACL,CAAC,mCACD,MAAM,KAAK,GAAG,IAAI,KAAK,MAAM,CAAC,GAAG,IAAI,CAAC,CAAC,CACxC;;GAGH,KAAK,mBAAmB;IACtB,MAAM,MAAM;AASZ,WAAO,CACL,CAAC,gCACD,MACE,KAAK,GAAG,OAAO,QAAQ,IAAI,CAAC,KAAK,CAAC,KAAK,SAAS,KAAK,KAAK,IAAI,CAAC,CAAC,CACjE,CACF;;GAGH,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK;GACL,KAAK,UACH,QAAO,CAAC,CAAC,cAAc,YAAY,IAAI,IAAI,IAAa;GAE1D,QACE,QAAO,EAAE;;GAEb;AAEF,QAAO,KAAK,CAAC,QAAQ,GAAG,YAAY;;;;;;;;;;;AAYtC,MAAa,2BAA2B,KACtC,CAAC,OAED,KAAK,KAAK,CAAC,WAAW,GAAG,CAAC,EAE1B,KACE,CAAC,SAED,KAAK,CAAC,QAAQ,CAAC,QAAQ,KAAK,CAAC,iBAAiB,KAAK,CAAC,eAAe,GAAG,CAAC,CAAC,EAExE,KAAK,CAAC,QAAQ,CAAC,WAAW,KAAK,CAAC,UAAU,CAAC,WAAW,OAAO,CAAC,OAAO,CAAC,CACvE,EAED,KACE,CAAC,oBACD,KAAK,CAAC,WAAW,EACjB,KAAK,CAAC,UAAU,CAAC,UAAU,EAC3B,KAAK,CAAC,8BAA8B,EACpC,KAAK,CAAC,SAAS,KAAK,CAAC,gBAAgB,CAAC,CACvC,CACF;;;;;;;ACxED,SAAgB,cACd,SACmB;CACnB,MAAM,EACJ,aAAa,CAAC,OAAO,EACrB,cAAc,EAAE,EAChB,gBAAgB,YAAY,KAAK,QAAQ,EAAE,yBAAyB,CAAC,EACrE,YAAY,EAAE,EACd,YAAY,KAAK,OAAO,MACxB,GAAG,SACD,WAAW,EAAE;CAGjB,MAAM,QAAQ,IAAI,MAAM;EACtB;EACA;EACD,CAAC;AAEF,KAAI,UAAU,SAAS,EACrB,OAAM,MAAM,GAAG,UAAU,CAAC,KAAK;AAIjC,KAAI,YAAY,SAAS,GAAG;EAC1B,MAAM,QAAQ,SAAS,YAAY;AACnC,MAAI,MAAM,SAAS,EACjB,OACG,QAAQ,MAAM,CACd,MAAM,KAAK,CAAC,8BAA8B,MAAM,KAAK,GAAG,MAAM,CAAC,CAAC,CAAC,CACjE,KAAK;;AAIZ,QAAO,EACL,OAAO,EAAE,SAAS,YAAY;AAE5B,MAAI,YAAY,CAAC,WAAW,MAAM,QAAQ,SAAS,SAAS,IAAI,CAAC,CAC/D,QAAO,EAAE,MAAM,SAAS;AAW1B,SAAO,EAAE,MAPI,MACV,QAAQ,aAAa,SAAS,CAC9B,MAAMC,YAAY,KAAK,CAAC,CACxB,MAAMC,UAAkB,KAAK,CAAC,CAC9B,MAAM,yBAAyB,CAC/B,WAAW,QAAQ,CACnB,KAAK,EACO;IAElB"}

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "svelte-preprocess-org",
-  "version": "0.3.4",
+  "version": "0.3.6",
   "description": "Svelte preprocessor for Org-mode documents",
   "author": "RangHo Lee <hello@rangho.me>",
   "homepage": "https://github.com/RangHo/svelte-preprocess-org",
@@ -14,11 +14,11 @@
   "devDependencies": {
     "@tsconfig/node-lts": "^22.0.2",
     "@types/node": "^22.18.12",
-    "ox-svelte": "0.4.5",
+    "ox-svelte": "0.4.8",
     "svelte": "^5.2.11"
   },
   "peerDependencies": {
-    "ox-svelte": "0.4.5",
+    "ox-svelte": "0.4.8",
     "svelte": "^5.2.11"
   },
   "dependencies": {