svelte-preprocess-org 0.1.1 → 0.2.1

package/dist/index.js

@@ -1 +1 @@
-import{execSync as t}from"node:child_process";import{join as e}from"node:path";function r(r,o){const{latexEnvironmentFormat:n,latexFragmentFormat:m,srcBlockFormat:a,imports:i}=o||{};let s=`/usr/bin/env emacs --script ${e(import.meta.dirname,"lisp","convert.el")}`;var c;return n&&(s+=` --latex-environment-format ${n}`),m&&(s+=` --latex-fragment-format ${m}`),a&&(s+=` --src-block-format ${a}`),i&&(s+=` --preface "(setq og-svelte-component-import-alist ${c=i,`'(${Object.entries(c).map((([t,e])=>`("${t}" . "${e}")`))})`})"`),t(s,{input:r}).toString()}function o(t){const{extensions:e=[".org"],...o}=t||{};return{markup({content:t,filename:n}){if(n&&!e.some((t=>n.endsWith(t))))return{code:t};return{code:r(t,o)}}}}export{o as default,o as orgPreprocess};
+import{execSync as n}from"node:child_process";import{join as r}from"node:path";class t{name;constructor(n){this.name=n}}class e{sexp;constructor(n){this.sexp=n}}function o(n){return n instanceof Object&&"car"in n&&"cdr"in n}function i(n){return null===n}function c(n,r){return{car:n,cdr:r}}function s(...n){if(0===n.length)return null;const[r,...t]=n;return c(r,s(...t))}function u(n){if(o(n))return`(${a(n)})`;if(i(n))return"nil";if("string"==typeof n)return`"${n}"`;if(function(n){return"number"==typeof n}(n))return n.toString();if(function(n){return"boolean"==typeof n}(n))return n?"t":"nil";if(n instanceof t)return n.name;if(n instanceof e)return`'${u(n.sexp)}`;throw new TypeError("Unknown type of S-expression: "+typeof n)}function a(n){let r="";if(o(n.car)?r+=`(${a(n.car)})`:r+=u(n.car),o(n.cdr))r+=` ${a(n.cdr)}`;else{if(i(n.cdr))return r;r+=` . ${u(n.cdr)}`}return r}function f(o){const{extensions:i=[".org"],...a}=o||{};return{markup({content:o,filename:f}){if(f&&!i.some((n=>f.endsWith(n))))return{code:o};const l=function(o,i){const{latexEnvironmentFormat:a,latexFragmentFormat:f,srcBlockFormat:l,imports:m}=i||{};let p=`/usr/bin/env emacs --script ${r(import.meta.dirname,"lisp","convert.el")}`;a&&(p+=` --latex-environment-format ${a}`),f&&(p+=` --latex-fragment-format ${f}`),l&&(p+=` --src-block-format ${l}`),m&&(p+=` --preface '${u(s(new t("setq"),new t("org-svelte-component-import-alist"),new e(s(...Object.entries(m).map((([n,r])=>c(n,r))))))).replaceAll("'","'\\''")}'`);return n(p,{input:o}).toString()}(o,a);return{code:l}}}}export{f as default,f as orgPreprocess};

package/dist/lisp/ox-svelte/README.md

@@ -0,0 +1,4 @@
+# Org-mode exporter backend for Svelte components
+
+`ox-svelte` is an opinionated Org-mode exporter backend that generates a Svelte
+component.

package/dist/lisp/ox-svelte/index.d.ts

@@ -0,0 +1,19 @@
+import type { SvelteComponent } from 'svelte';
+
+declare module 'ox-svelte' {
+  export type OrgModule = {
+    default: typeof SvelteComponent;
+    metadata: OrgMetadata;
+  };
+
+  export type OrgMetadata = {
+    title: string?;
+    subtitle: string?;
+    author: string?;
+    date: string?;
+    description: string?;
+    keywords: string[]?;
+    language: string?;
+    creator: string?;
+  };
+}

package/dist/lisp/ox-svelte/ox-svelte.el

@@ -61,6 +61,21 @@ And the generated Svelte file will contain the following import statement:
   :type '(repeat (cons (string "Component name")
                        (string "Component path"))))
 
+(defcustom org-svelte-raw-script-content
+  ""
+  "JavaScript code that will be included in the module context script verbatim.
+
+The content of this variable will be inserted right after the generated import
+statements.  It must contain a valid JavaScript code, as this Emacs module will
+perform no validation.
+
+In the similar sense, it is highly recommended that you always use semicolons
+at least for this section.  Your script, combined with automatically generated
+import statements and metadata storage, may be parsed unexpectedly if you rely
+on JavaScript semicolon correction mechanism."
+  :group 'org-export-svelte
+  :type 'string)
+
 (defconst org-svelte--component-import-format
   "import %s from '%s';"
   "Format string that will be used to generate the import statement.")
@@ -73,6 +88,16 @@ And the generated Svelte file will contain the following import statement:
   "<script context=\"module\">"
   "Regexp that matches the opening tag of the module-context script.")
 
+(defcustom org-svelte-id-attribute-type
+  nil
+  "Type of ID attribute to use in the generated Svelte code.
+
+This option can be nil (the default) or t to remove all ID attributes or to use
+the default ID generation algorithm."
+  :group 'org-export-svelte
+  :type '(choice (const :tag "Default" nil)
+                 (const :tag "Remove all" t)))
+
 (defcustom org-svelte-latex-environment-format
   "{@html %s}"
   "Format string that will be used to generate the LaTeX environment.
@@ -116,10 +141,13 @@ class inside a <pre> tag."
                     (?s "As Svelte file"
                         (lambda (a s v _b)
                           (org-svelte-export-to-svelte a s v)))))
-  :translate-alist '((latex-environment . org-svelte-latex-environment)
+  :translate-alist '((export-block . org-svelte-export-block)
+                     (export-snippet . org-svelte-export-snippet)
+                     (inner-template . org-svelte-inner-template)
+                     (keyword . org-svelte-keyword)
+                     (latex-environment . org-svelte-latex-environment)
                      (latex-fragment . org-svelte-latex-fragment)
                      (src-block . org-svelte-src-block)
-                     (inner-template . org-svelte-inner-template)
                      (template . org-svelte-template))
   :options-alist '( ; Overriding HTML options
                    (:html-doctype "HTML_DOCTYPE" nil "html5")
@@ -150,6 +178,27 @@ Where the result would be:
                                                    escaped-string)))
     (format "String.raw`%s`" escaped-string)))
 
+(defun org-svelte-export-block (export-block _contents _info)
+  "Transcode an EXPORT-BLOCK element from Org to Svelte.
+CONTENTS is nil.  INFO is a plist holding contextual information."
+  (when (or (string= (org-element-property :type export-block) "HTML")
+            (string= (org-element-property :type export-block) "SVELTE"))
+    (org-remove-indentation (org-element-property :value export-block))))
+
+(defun org-svelte-export-snippet (export-snippet _contents _info)
+  "Transcode an EXPORT-SNIPPET element from Org to Svelte.
+CONTENTS is nil.  INFO is a plist holding contextual information."
+  (when (or (eq (org-export-snippet-backend export-snippet) 'svelte)
+            (eq (org-export-snippet-backend export-snippet) 'html))
+    (org-element-property :value export-snippet)))
+
+(defun org-svelte-keyword (keyword _contents _info)
+  "Transcode a KEYWORD element from Org to Svelte.
+CONTENTS is nil.  INFO is a plist holding contextual information."
+  (when (or (string= (org-element-property :key keyword) "HTML")
+            (string= (org-element-property :key keyword) "SVELTE"))
+    (org-element-property :value keyword)))
+
 (defun org-svelte-latex-environment (latex-environment _contents info)
   "Transcode a LATEX-ENVIRONMENT element from Org to Svelte.
 CONTENTS is nil.  INFO is a plist holding contextual information."
@@ -223,15 +272,22 @@ INFO is a plist holding contextual information."
 INFO is a plist holding contextual information."
   (let ((imports (org-svelte--generate-imports info))
         (metadata (org-svelte--generate-metadata-export info)))
-    (format "<script context=\"module\">\n%s\n%s\n</script>\n"
+    (format "<script context=\"module\">\n%s\n%s\n%s\n</script>\n"
             imports
+            org-svelte-raw-script-content
             metadata)))
 
 (defun org-svelte-inner-template (contents _info)
   "Return body of document after converting it to Svelte.
 CONTENTS is the transcoded contents string.  INFO is a plist holding export
 options."
-  contents)
+  (let* ((contents (if (not org-svelte-id-attribute-type)
+                       (replace-regexp-in-string
+                        " id=\"[[:alpha:]-]*org[[:alnum:]]\\{7\\}\""
+                        ""
+                        contents t)
+                     contents)))
+    contents))
 
 (defun org-svelte-template (contents info)
   "Return complete document string after Svelte conversion.

package/dist/lisp/ox-svelte/package.json

@@ -0,0 +1,11 @@
+{
+  "name": "ox-svelte",
+  "version": "0.1.0",
+  "description": "Org-mode exporter backend for Svelte components (type definitions)",
+  "types": "index.d.ts",
+  "author": "RangHo Lee <hello@rangho.me>",
+  "license": "GPL-3.0-or-later",
+  "devDependencies": {
+    "svelte": "^4.2.12"
+  }
+}

package/dist/lisp/ox-svelte/pnpm-lock.yaml

@@ -0,0 +1,155 @@
+lockfileVersion: '6.0'
+
+settings:
+  autoInstallPeers: true
+  excludeLinksFromLockfile: false
+
+devDependencies:
+  svelte:
+    specifier: ^4.2.12
+    version: 4.2.12
+
+packages:
+
+  /@ampproject/remapping@2.2.1:
+    resolution: {integrity: sha512-lFMjJTrFL3j7L9yBxwYfCq2k6qqwHyzuUl/XBnif78PWTJYyL/dfowQHWE3sp6U6ZzqWiiIZnpTMO96zhkjwtg==}
+    engines: {node: '>=6.0.0'}
+    dependencies:
+      '@jridgewell/gen-mapping': 0.3.4
+      '@jridgewell/trace-mapping': 0.3.23
+    dev: true
+
+  /@jridgewell/gen-mapping@0.3.4:
+    resolution: {integrity: sha512-Oud2QPM5dHviZNn4y/WhhYKSXksv+1xLEIsNrAbGcFzUN3ubqWRFT5gwPchNc5NuzILOU4tPBDTZ4VwhL8Y7cw==}
+    engines: {node: '>=6.0.0'}
+    dependencies:
+      '@jridgewell/set-array': 1.1.2
+      '@jridgewell/sourcemap-codec': 1.4.15
+      '@jridgewell/trace-mapping': 0.3.23
+    dev: true
+
+  /@jridgewell/resolve-uri@3.1.2:
+    resolution: {integrity: sha512-bRISgCIjP20/tbWSPWMEi54QVPRZExkuD9lJL+UIxUKtwVJA8wW1Trb1jMs1RFXo1CBTNZ/5hpC9QvmKWdopKw==}
+    engines: {node: '>=6.0.0'}
+    dev: true
+
+  /@jridgewell/set-array@1.1.2:
+    resolution: {integrity: sha512-xnkseuNADM0gt2bs+BvhO0p78Mk762YnZdsuzFV018NoG1Sj1SCQvpSqa7XUaTam5vAGasABV9qXASMKnFMwMw==}
+    engines: {node: '>=6.0.0'}
+    dev: true
+
+  /@jridgewell/sourcemap-codec@1.4.15:
+    resolution: {integrity: sha512-eF2rxCRulEKXHTRiDrDy6erMYWqNw4LPdQ8UQA4huuxaQsVeRPFl2oM8oDGxMFhJUWZf9McpLtJasDDZb/Bpeg==}
+    dev: true
+
+  /@jridgewell/trace-mapping@0.3.23:
+    resolution: {integrity: sha512-9/4foRoUKp8s96tSkh8DlAAc5A0Ty8vLXld+l9gjKKY6ckwI8G15f0hskGmuLZu78ZlGa1vtsfOa+lnB4vG6Jg==}
+    dependencies:
+      '@jridgewell/resolve-uri': 3.1.2
+      '@jridgewell/sourcemap-codec': 1.4.15
+    dev: true
+
+  /@types/estree@1.0.5:
+    resolution: {integrity: sha512-/kYRxGDLWzHOB7q+wtSUQlFrtcdUccpfy+X+9iMBpHK8QLLhx2wIPYuS5DYtR9Wa/YlZAbIovy7qVdB1Aq6Lyw==}
+    dev: true
+
+  /acorn@8.11.3:
+    resolution: {integrity: sha512-Y9rRfJG5jcKOE0CLisYbojUjIrIEE7AGMzA/Sm4BslANhbS+cDMpgBdcPT91oJ7OuJ9hYJBx59RjbhxVnrF8Xg==}
+    engines: {node: '>=0.4.0'}
+    hasBin: true
+    dev: true
+
+  /aria-query@5.3.0:
+    resolution: {integrity: sha512-b0P0sZPKtyu8HkeRAfCq0IfURZK+SuwMjY1UXGBU27wpAiTwQAIlq56IbIO+ytk/JjS1fMR14ee5WBBfKi5J6A==}
+    dependencies:
+      dequal: 2.0.3
+    dev: true
+
+  /axobject-query@4.0.0:
+    resolution: {integrity: sha512-+60uv1hiVFhHZeO+Lz0RYzsVHy5Wr1ayX0mwda9KPDVLNJgZ1T9Ny7VmFbLDzxsH0D87I86vgj3gFrjTJUYznw==}
+    dependencies:
+      dequal: 2.0.3
+    dev: true
+
+  /code-red@1.0.4:
+    resolution: {integrity: sha512-7qJWqItLA8/VPVlKJlFXU+NBlo/qyfs39aJcuMT/2ere32ZqvF5OSxgdM5xOfJJ7O429gg2HM47y8v9P+9wrNw==}
+    dependencies:
+      '@jridgewell/sourcemap-codec': 1.4.15
+      '@types/estree': 1.0.5
+      acorn: 8.11.3
+      estree-walker: 3.0.3
+      periscopic: 3.1.0
+    dev: true
+
+  /css-tree@2.3.1:
+    resolution: {integrity: sha512-6Fv1DV/TYw//QF5IzQdqsNDjx/wc8TrMBZsqjL9eW01tWb7R7k/mq+/VXfJCl7SoD5emsJop9cOByJZfs8hYIw==}
+    engines: {node: ^10 || ^12.20.0 || ^14.13.0 || >=15.0.0}
+    dependencies:
+      mdn-data: 2.0.30
+      source-map-js: 1.0.2
+    dev: true
+
+  /dequal@2.0.3:
+    resolution: {integrity: sha512-0je+qPKHEMohvfRTCEo3CrPG6cAzAYgmzKyxRiYSSDkS6eGJdyVJm7WaYA5ECaAD9wLB2T4EEeymA5aFVcYXCA==}
+    engines: {node: '>=6'}
+    dev: true
+
+  /estree-walker@3.0.3:
+    resolution: {integrity: sha512-7RUKfXgSMMkzt6ZuXmqapOurLGPPfgj6l9uRZ7lRGolvk0y2yocc35LdcxKC5PQZdn2DMqioAQ2NoWcrTKmm6g==}
+    dependencies:
+      '@types/estree': 1.0.5
+    dev: true
+
+  /is-reference@3.0.2:
+    resolution: {integrity: sha512-v3rht/LgVcsdZa3O2Nqs+NMowLOxeOm7Ay9+/ARQ2F+qEoANRcqrjAZKGN0v8ymUetZGgkp26LTnGT7H0Qo9Pg==}
+    dependencies:
+      '@types/estree': 1.0.5
+    dev: true
+
+  /locate-character@3.0.0:
+    resolution: {integrity: sha512-SW13ws7BjaeJ6p7Q6CO2nchbYEc3X3J6WrmTTDto7yMPqVSZTUyY5Tjbid+Ab8gLnATtygYtiDIJGQRRn2ZOiA==}
+    dev: true
+
+  /magic-string@0.30.7:
+    resolution: {integrity: sha512-8vBuFF/I/+OSLRmdf2wwFCJCz+nSn0m6DPvGH1fS/KiQoSaR+sETbov0eIk9KhEKy8CYqIkIAnbohxT/4H0kuA==}
+    engines: {node: '>=12'}
+    dependencies:
+      '@jridgewell/sourcemap-codec': 1.4.15
+    dev: true
+
+  /mdn-data@2.0.30:
+    resolution: {integrity: sha512-GaqWWShW4kv/G9IEucWScBx9G1/vsFZZJUO+tD26M8J8z3Kw5RDQjaoZe03YAClgeS/SWPOcb4nkFBTEi5DUEA==}
+    dev: true
+
+  /periscopic@3.1.0:
+    resolution: {integrity: sha512-vKiQ8RRtkl9P+r/+oefh25C3fhybptkHKCZSPlcXiJux2tJF55GnEj3BVn4A5gKfq9NWWXXrxkHBwVPUfH0opw==}
+    dependencies:
+      '@types/estree': 1.0.5
+      estree-walker: 3.0.3
+      is-reference: 3.0.2
+    dev: true
+
+  /source-map-js@1.0.2:
+    resolution: {integrity: sha512-R0XvVJ9WusLiqTCEiGCmICCMplcCkIwwR11mOSD9CR5u+IXYdiseeEuXCVAjS54zqwkLcPNnmU4OeJ6tUrWhDw==}
+    engines: {node: '>=0.10.0'}
+    dev: true
+
+  /svelte@4.2.12:
+    resolution: {integrity: sha512-d8+wsh5TfPwqVzbm4/HCXC783/KPHV60NvwitJnyTA5lWn1elhXMNWhXGCJ7PwPa8qFUnyJNIyuIRt2mT0WMug==}
+    engines: {node: '>=16'}
+    dependencies:
+      '@ampproject/remapping': 2.2.1
+      '@jridgewell/sourcemap-codec': 1.4.15
+      '@jridgewell/trace-mapping': 0.3.23
+      '@types/estree': 1.0.5
+      acorn: 8.11.3
+      aria-query: 5.3.0
+      axobject-query: 4.0.0
+      code-red: 1.0.4
+      css-tree: 2.3.1
+      estree-walker: 3.0.3
+      is-reference: 3.0.2
+      locate-character: 3.0.0
+      magic-string: 0.30.7
+      periscopic: 3.1.0
+    dev: true

package/dist/sexp.d.ts

@@ -0,0 +1,17 @@
+export type Sexp = Value | Cell;
+export type Value = Atom | Quote | string | number | boolean | null;
+export type Cell = {
+    car: Sexp;
+    cdr: Sexp;
+};
+export declare class Atom {
+    name: string;
+    constructor(name: string);
+}
+export declare class Quote {
+    sexp: Sexp;
+    constructor(sexp: Sexp);
+}
+export declare function cons(car: Sexp, cdr: Sexp): Cell;
+export declare function list(...args: Sexp[]): Sexp;
+export declare function stringify(sexp: Sexp): string;

package/eslint.config.js

@@ -0,0 +1,9 @@
+import eslint from "@eslint/js";
+import tslint from "typescript-eslint";
+
+const config = tslint.config(
+  eslint.configs.recommended,
+  ...tslint.configs.recommended,
+);
+
+export default config;

package/jest.config.js

@@ -0,0 +1,11 @@
+/** @type {import('ts-jest').JestConfigWithTsJest} */
+const config = {
+  preset: "ts-jest/presets/default-esm",
+  moduleDirectories: ["node_modules", "src"],
+  moduleNameMapper: {
+    "^@/.*": "<rootDir>/src/$1",
+    "^(\\.{1,2}/.*)\\.js$": "$1",
+  },
+};
+
+export default config;

package/package.json

@@ -1,30 +1,33 @@
 {
   "name": "svelte-preprocess-org",
   "type": "module",
-  "version": "0.1.1",
+  "version": "0.2.1",
   "description": "Svelte preprocessor for Org-mode",
   "author": "RangHo Lee <hello@rangho.me>",
   "homepage": "https://github.com/RangHo/svelte-preprocess-org",
   "license": "GPL-3.0-or-later",
   "main": "dist/index.js",
   "types": "dist/index.d.ts",
+  "files": "dist/*",
   "devDependencies": {
     "@rollup/plugin-commonjs": "^25.0.7",
     "@rollup/plugin-node-resolve": "^15.2.3",
     "@rollup/plugin-terser": "^0.4.4",
     "@rollup/plugin-typescript": "^11.1.6",
     "@tsconfig/node-lts": "^20.1.1",
+    "@types/jest": "^29.5.12",
     "@types/node": "^20.11.19",
-    "@typescript-eslint/eslint-plugin": "^6.15.0",
-    "@typescript-eslint/parser": "^6.15.0",
     "eslint": "^8.56.0",
+    "jest": "^29.7.0",
     "ox-svelte": "^0.1.0",
     "prettier": "^3.1.1",
     "rollup": "^4.12.0",
     "rollup-plugin-copy": "^3.5.0",
     "svelte": "^4.2.12",
+    "ts-jest": "^29.1.2",
     "tslib": "^2.6.2",
-    "typescript": "^5.3.3"
+    "typescript": "^5.3.3",
+    "typescript-eslint": "^7.2.0"
   },
   "peerDependencies": {
     "ox-svelte": "^0.1.0",
@@ -32,7 +35,7 @@
   },
   "scripts": {
     "build": "rollup -c",
-    "test": "jest",
+    "test": "NODE_OPTIONS='--experimental-vm-modules' jest",
     "format": "prettier --write .",
     "lint": "eslint ."
   }

package/{.prettierrc.cjs → prettier.config.js}

@@ -1,3 +1,5 @@
-module.exports = {
+const config = {
   // Use default Prettier configuration
 };
+
+export default config;

package/src/emacs.ts

@@ -1,6 +1,8 @@
 import { execSync } from "node:child_process";
 import { join } from "node:path";
 
+import { Atom, Quote, cons, list, stringify } from "./sexp.js";
+
 export interface OxSvelteOptions {
   latexEnvironmentFormat?: string;
   latexFragmentFormat?: string;
@@ -8,12 +10,6 @@ export interface OxSvelteOptions {
   imports?: Record<string, string>;
 }
 
-function recordToAlist(target: Record<string, string>): string {
-  const entries = Object.entries(target);
-  const alist = entries.map(([key, val]) => `("${key}" . "${val}")`);
-  return `'(${alist})`;
-}
-
 export function convert(content: string, options?: OxSvelteOptions): string {
   const {
     latexEnvironmentFormat,
@@ -37,10 +33,17 @@ export function convert(content: string, options?: OxSvelteOptions): string {
     command += ` --src-block-format ${srcBlockFormat}`;
   }
   if (imports) {
-    command += ` --preface "(setq og-svelte-component-import-alist ${recordToAlist(
-      imports,
-    )})"`;
+    const sexp = list(
+      new Atom("setq"),
+      new Atom("org-svelte-component-import-alist"),
+      new Quote(
+        list(...Object.entries(imports).map(([key, val]) => cons(key, val))),
+      ),
+    );
+    command += ` --preface '${stringify(sexp).replaceAll("'", "'\\''")}'`;
   }
 
-  return execSync(command, { input: content }).toString();
+  const result = execSync(command, { input: content }).toString();
+
+  return result;
 }

package/src/lisp/ox-svelte/README.md

@@ -0,0 +1,4 @@
+# Org-mode exporter backend for Svelte components
+
+`ox-svelte` is an opinionated Org-mode exporter backend that generates a Svelte
+component.

package/src/lisp/ox-svelte/index.d.ts

@@ -0,0 +1,19 @@
+import type { SvelteComponent } from 'svelte';
+
+declare module 'ox-svelte' {
+  export type OrgModule = {
+    default: typeof SvelteComponent;
+    metadata: OrgMetadata;
+  };
+
+  export type OrgMetadata = {
+    title: string?;
+    subtitle: string?;
+    author: string?;
+    date: string?;
+    description: string?;
+    keywords: string[]?;
+    language: string?;
+    creator: string?;
+  };
+}

package/src/lisp/ox-svelte/ox-svelte.el

@@ -61,6 +61,21 @@ And the generated Svelte file will contain the following import statement:
   :type '(repeat (cons (string "Component name")
                        (string "Component path"))))
 
+(defcustom org-svelte-raw-script-content
+  ""
+  "JavaScript code that will be included in the module context script verbatim.
+
+The content of this variable will be inserted right after the generated import
+statements.  It must contain a valid JavaScript code, as this Emacs module will
+perform no validation.
+
+In the similar sense, it is highly recommended that you always use semicolons
+at least for this section.  Your script, combined with automatically generated
+import statements and metadata storage, may be parsed unexpectedly if you rely
+on JavaScript semicolon correction mechanism."
+  :group 'org-export-svelte
+  :type 'string)
+
 (defconst org-svelte--component-import-format
   "import %s from '%s';"
   "Format string that will be used to generate the import statement.")
@@ -73,6 +88,16 @@ And the generated Svelte file will contain the following import statement:
   "<script context=\"module\">"
   "Regexp that matches the opening tag of the module-context script.")
 
+(defcustom org-svelte-id-attribute-type
+  nil
+  "Type of ID attribute to use in the generated Svelte code.
+
+This option can be nil (the default) or t to remove all ID attributes or to use
+the default ID generation algorithm."
+  :group 'org-export-svelte
+  :type '(choice (const :tag "Default" nil)
+                 (const :tag "Remove all" t)))
+
 (defcustom org-svelte-latex-environment-format
   "{@html %s}"
   "Format string that will be used to generate the LaTeX environment.
@@ -116,10 +141,13 @@ class inside a <pre> tag."
                     (?s "As Svelte file"
                         (lambda (a s v _b)
                           (org-svelte-export-to-svelte a s v)))))
-  :translate-alist '((latex-environment . org-svelte-latex-environment)
+  :translate-alist '((export-block . org-svelte-export-block)
+                     (export-snippet . org-svelte-export-snippet)
+                     (inner-template . org-svelte-inner-template)
+                     (keyword . org-svelte-keyword)
+                     (latex-environment . org-svelte-latex-environment)
                      (latex-fragment . org-svelte-latex-fragment)
                      (src-block . org-svelte-src-block)
-                     (inner-template . org-svelte-inner-template)
                      (template . org-svelte-template))
   :options-alist '( ; Overriding HTML options
                    (:html-doctype "HTML_DOCTYPE" nil "html5")
@@ -150,6 +178,27 @@ Where the result would be:
                                                    escaped-string)))
     (format "String.raw`%s`" escaped-string)))
 
+(defun org-svelte-export-block (export-block _contents _info)
+  "Transcode an EXPORT-BLOCK element from Org to Svelte.
+CONTENTS is nil.  INFO is a plist holding contextual information."
+  (when (or (string= (org-element-property :type export-block) "HTML")
+            (string= (org-element-property :type export-block) "SVELTE"))
+    (org-remove-indentation (org-element-property :value export-block))))
+
+(defun org-svelte-export-snippet (export-snippet _contents _info)
+  "Transcode an EXPORT-SNIPPET element from Org to Svelte.
+CONTENTS is nil.  INFO is a plist holding contextual information."
+  (when (or (eq (org-export-snippet-backend export-snippet) 'svelte)
+            (eq (org-export-snippet-backend export-snippet) 'html))
+    (org-element-property :value export-snippet)))
+
+(defun org-svelte-keyword (keyword _contents _info)
+  "Transcode a KEYWORD element from Org to Svelte.
+CONTENTS is nil.  INFO is a plist holding contextual information."
+  (when (or (string= (org-element-property :key keyword) "HTML")
+            (string= (org-element-property :key keyword) "SVELTE"))
+    (org-element-property :value keyword)))
+
 (defun org-svelte-latex-environment (latex-environment _contents info)
   "Transcode a LATEX-ENVIRONMENT element from Org to Svelte.
 CONTENTS is nil.  INFO is a plist holding contextual information."
@@ -223,15 +272,22 @@ INFO is a plist holding contextual information."
 INFO is a plist holding contextual information."
   (let ((imports (org-svelte--generate-imports info))
         (metadata (org-svelte--generate-metadata-export info)))
-    (format "<script context=\"module\">\n%s\n%s\n</script>\n"
+    (format "<script context=\"module\">\n%s\n%s\n%s\n</script>\n"
             imports
+            org-svelte-raw-script-content
             metadata)))
 
 (defun org-svelte-inner-template (contents _info)
   "Return body of document after converting it to Svelte.
 CONTENTS is the transcoded contents string.  INFO is a plist holding export
 options."
-  contents)
+  (let* ((contents (if (not org-svelte-id-attribute-type)
+                       (replace-regexp-in-string
+                        " id=\"[[:alpha:]-]*org[[:alnum:]]\\{7\\}\""
+                        ""
+                        contents t)
+                     contents)))
+    contents))
 
 (defun org-svelte-template (contents info)
   "Return complete document string after Svelte conversion.

package/src/lisp/ox-svelte/package.json

@@ -0,0 +1,11 @@
+{
+  "name": "ox-svelte",
+  "version": "0.1.0",
+  "description": "Org-mode exporter backend for Svelte components (type definitions)",
+  "types": "index.d.ts",
+  "author": "RangHo Lee <hello@rangho.me>",
+  "license": "GPL-3.0-or-later",
+  "devDependencies": {
+    "svelte": "^4.2.12"
+  }
+}