✨ Add String#link function

README.md

@@ -194,8 +194,9 @@ The module that bundles the dependencies is obtained from
 
 ### String
 
-`endsWith`, `match`, `repeat`, `replace`, `startsWith`, `toLowerCase`,
-`toUpperCase`, `trimEnd`, `trimLeft`, `trimRight`, `trimStart`, `trim`
+`charAt`, `endsWith`, `link`, `match`, `repeat`, `replace`, `startsWith`,
+`toLowerCase`, `toUpperCase`, `trimEnd`, `trimLeft`, `trimRight`, `trimStart`,
+`trim`
 
 ### Symbol
 

string/link.ts

@@ -0,0 +1,20 @@
+// Copyright 2021-present the Core-fn authors. All rights reserved. MIT license.
+import { curry } from "../deps.ts";
+import { link as _link } from "../uncurry/string/link.ts";
+
+/**
+ * Returns an `<a>` HTML element and sets the href attribute value.
+ * @param url - href url string
+ * @param val - Any `String`
+ * @returns The result of `val.link(url)`
+ *
+ * @example
+ * ```ts
+ * link('https://google.com', 'google') // '<a href="https://google.com">google</a>'
+ * ```
+ *
+ * @beta
+ */
+const link = curry(_link);
+
+export { link };

string/link_test.ts

@@ -0,0 +1,9 @@
+// Copyright 2021-present the Core-fn authors. All rights reserved. MIT license.
+import { link } from "./link.ts";
+import { assertEqualsType } from "../dev_deps.ts";
+
+Deno.test("link", () => {
+  assertEqualsType<(val: string) => string>(link(""));
+  assertEqualsType<string>(link("")(""));
+  assertEqualsType<string>(link("", ""));
+});

string/mod.ts

@@ -12,3 +12,4 @@ export { trimEnd } from "./trim_end.ts";
 export { trimStart } from "./trim_start.ts";
 export { match } from "./match.ts";
 export { charAt } from "./char_at.ts";
+export { link } from "./link.ts";

uncurry/string/link.ts

@@ -0,0 +1,27 @@
+// Copyright 2021-present the Core-fn authors. All rights reserved. MIT license.
+
+/**
+ * @internal
+ */
+type Link<T extends string, U extends string> = `\<a href="${T}">${U}\</a>`;
+
+/**
+ * Returns an `<a>` HTML element and sets the href attribute value.
+ * @param url - href url string
+ * @param val - Any `String`
+ * @returns The result of `val.link(url)`
+ *
+ * @example
+ * ```ts
+ * link('https://google.com', 'google') // '<a href="https://google.com">google</a>'
+ * ```
+ *
+ * @beta
+ */
+const link = <T extends string, U extends string>(
+  url: T,
+  val: U,
+): Link<T, U> => val.link(url) as Link<T, U>;
+
+export { link };
+export type { Link };

uncurry/string/link_test.ts

@@ -0,0 +1,18 @@
+// Copyright 2021-present the Core-fn authors. All rights reserved. MIT license.
+import { assertEquals } from "../../dev_deps.ts";
+import { link } from "./link.ts";
+
+Deno.test("link", () => {
+  const table: [string, string, string][] = [
+    ["", "", '<a href=""></a>'],
+    ["abc", "", '<a href="abc"></a>'],
+    ["abc", "efg", '<a href="abc">efg</a>'],
+  ];
+  table.forEach(([pos, val, expected]) => {
+    assertEquals(
+      link(pos, val),
+      expected,
+      `link(${pos}, ${val}) -> ${expected}`,
+    );
+  });
+});

uncurry/string/mod.ts

@@ -5,3 +5,4 @@ export { endsWith } from "./ends_with.ts";
 export { repeat } from "./repeat.ts";
 export { match } from "./match.ts";
 export { charAt } from "./char_at.ts";
+export { link } from "./link.ts";