kimendisch/pronomen.lol
0
0
Fork 0
Code Issues Pull Requests Projects Activity

🏗️ update domain name

Browse Source
This commit is contained in:
DrMaxNix 2024-05-03 11:38:27 +02:00
parent bafe877ef6
commit fd81d145da
4 changed files with 15 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/pronouns/config.clj
View File

@ -1,5 +1,6 @@
;; pronoun.is - a website for pronoun usage examples ;; pronoun.lol - a website for pronoun usage examples
;; Copyright (C) 2014 - 2018 Morgan Astra ;; Copyright (C) 2014 - 2018 Morgan Astra
;; Copyright (C) 2024 Kim Endisch
;; This program is free software: you can redistribute it and/or modify ;; This program is free software: you can redistribute it and/or modify
;; it under the terms of the GNU Affero General Public License as ;; it under the terms of the GNU Affero General Public License as

17
src/pronouns/pages.clj
View File

@ -1,5 +1,6 @@
;; pronoun.is - a website for pronoun usage examples ;; pronoun.lol - a website for pronoun usage examples
;; Copyright (C) 2014 - 2018 Morgan Astra ;; Copyright (C) 2014 - 2018 Morgan Astra
;; Copyright (C) 2024 Kim Endisch
;; This program is free software: you can redistribute it and/or modify ;; This program is free software: you can redistribute it and/or modify
;; it under the terms of the GNU Affero General Public License as ;; it under the terms of the GNU Affero General Public License as
@ -94,7 +95,7 @@
[:p "Full usage: " [:p "Full usage: "
;; FIXME morgan.astra <2018-11-14 Wed> ;; FIXME morgan.astra <2018-11-14 Wed>
;; This looks really ugly in the browser ;; This looks really ugly in the browser
[:tt "https://pronoun.is/subject-pronoun/object-pronoun/possessive-determiner/possessive-pronoun/reflexive"] [:tt "https://pronoun.lol/subject-pronoun/object-pronoun/possessive-determiner/possessive-pronoun/reflexive"]
" displays examples of your pronouns."] " displays examples of your pronouns."]
[:p "This is a bit unwieldy. If we have a good guess we'll let you use" [:p "This is a bit unwieldy. If we have a good guess we'll let you use"
" just the first one or two."]]) " just the first one or two."]])
@ -106,11 +107,11 @@
[:p "Written by " [:p "Written by "
(twitter-name "morganastra") (twitter-name "morganastra")
", whose " ", whose "
(href "https://pronoun.is/she" "pronoun.is/she")] (href "https://pronoun.lol/she" "pronoun.lol/she")]
[:p "pronoun.is is free software under the " [:p "pronoun.lol is free software under the "
(href "https://www.gnu.org/licenses/agpl.html" "AGPLv3") (href "https://www.gnu.org/licenses/agpl.html" "AGPLv3")
"! visit the project on " "! visit the project on "
(href "https://github.com/witch-house/pronoun.is" "github")] (href "https://github.com/witch-house/pronoun.lol" "github")]
[:p "&lt;3"]])) [:p "&lt;3"]]))
(defn footer-block [] (defn footer-block []
@ -160,7 +161,7 @@
(let [abbreviations (take 6 (u/abbreviate @pronouns-table)) (let [abbreviations (take 6 (u/abbreviate @pronouns-table))
links (map make-link abbreviations) links (map make-link abbreviations)
title "Pronoun Island" title "Pronoun Island"
description "Pronoun.is is a website for personal pronoun usage examples."] description "Pronoun.lol is a website for personal pronoun usage examples."]
(html (html
[:html [:html
[:head [:head
@ -175,7 +176,7 @@
[:body [:body
(header-block title) (header-block title)
[:div {:class "section table"} [:div {:class "section table"}
[:p "pronoun.is is a website for personal pronoun usage examples"] [:p "pronoun.lol is a website for personal pronoun usage examples"]
[:p "here are some pronouns the site knows about:"] [:p "here are some pronouns the site knows about:"]
[:ul links] [:ul links]
[:p [:small (href "all-pronouns" "see all pronouns in the database")]]]] [:p [:small (href "all-pronouns" "see all pronouns in the database")]]]]
@ -220,7 +221,7 @@
[:div [:div
"Did you mean: " "Did you mean: "
(href new-path (href new-path
(str "pronoun.is" (str "pronoun.lol"
new-path))]))] new-path))]))]
(footer-block)]]))) (footer-block)]])))

3
src/pronouns/util.clj
View File

@ -1,5 +1,6 @@
;; pronoun.is - a website for pronoun usage examples ;; pronoun.lol - a website for pronoun usage examples
;; Copyright (C) 2014 - 2018 Morgan Astra ;; Copyright (C) 2014 - 2018 Morgan Astra
;; Copyright (C) 2024 Kim Endisch
;; This program is free software: you can redistribute it and/or modify ;; This program is free software: you can redistribute it and/or modify
;; it under the terms of the GNU Affero General Public License as ;; it under the terms of the GNU Affero General Public License as

3
src/pronouns/web.clj
View File

@ -1,5 +1,6 @@
;; pronoun.is - a website for pronoun usage examples ;; pronoun.lol - a website for pronoun usage examples
;; Copyright (C) 2014 - 2018 Morgan Astra ;; Copyright (C) 2014 - 2018 Morgan Astra
;; Copyright (C) 2024 Kim Endisch
;; This program is free software: you can redistribute it and/or modify ;; This program is free software: you can redistribute it and/or modify
;; it under the terms of the GNU Affero General Public License as ;; it under the terms of the GNU Affero General Public License as