(fn [pair-of]
(let [text (get pair-of 1)]
(cond
(clojure.string/starts-with? text "http")
(list [:a {:href text} (truncate text 60)] [:br])
:else (list [:a {:href (str "https://google.com/search?q=" text)} text] [:br]))))
Doesn't always work but works often enough! ;) (map link-expander list-of-links)
I wonder what it looks like in Arc. Does HN keep any of its codebase public?