Fix package links with dashes in them

Author: josevalim

src/hexdocs/data/model/route.gleam

@@ -73,12 +73,7 @@ fn search_from_uri(location: Uri) {
             list.key_find(query, "packages")
             |> result.unwrap("")
             |> string.split(on: ",")
-            |> list.filter_map(fn(package) {
-              case string.split(package, ":") {
-                [name, version] -> Ok(#(name, version))
-                _ -> Error(Nil)
-              }
-            })
+            |> list.filter_map(fn(package) { string.split_once(package, ":") })
           })
         }
       }

src/hexdocs/services/hexdocs.gleam

@@ -1,4 +1,3 @@
-import gleam/bool
 import gleam/dynamic/decode
 import gleam/fetch
 import gleam/http
@@ -57,6 +56,13 @@ pub fn typesense_search(
   |> promise.map(result.map_error(_, loss.FetchError))
 }
 
+pub fn package_path(document: Document) {
+  case string.split_once(document.package, "-") {
+    Ok(#(package, version)) -> package <> "/" <> version
+    Error(Nil) -> document.package
+  }
+}
+
 pub fn typesense_decoder() {
   use results <- decode.field(
     "results",

src/hexdocs/view/search.gleam

@@ -506,8 +506,7 @@ fn trash_button(filter: version.Package) {
 }
 
 fn result_card(model: Model, document: hexdocs.Document) {
-  let display_url =
-    "/" <> string.replace(document.package, "-", "/") <> "/" <> document.ref
+  let display_url = hexdocs.package_path(document) <> "/" <> document.ref
   let link_url = config.hexdocs_url() <> display_url
 
   html.div([class("w-full bg-slate-100 dark:bg-slate-800 rounded-2xl p-4")], [
@@ -546,10 +545,7 @@ fn result_card(model: Model, document: hexdocs.Document) {
           html.ul([class("space-y-1")], {
             list.map(document.headers, fn(header: hexdocs.Header) {
               let header_display_url =
-                "/"
-                <> string.replace(document.package, "-", "/")
-                <> "/"
-                <> header.ref
+                hexdocs.package_path(document) <> "/" <> header.ref
               let header_link_url = config.hexdocs_url() <> header_display_url
 
               html.li(