From 930c49e8d688050afab9c7800b0ba70cbd66919b Mon Sep 17 00:00:00 2001 From: Swrup Date: Tue, 15 Apr 2025 05:59:03 +0200 Subject: [PATCH] rename geochan --- README.md | 39 +++++----------------------------- dune-project | 16 +++++++------- permap.opam => geochan.opam | 13 ++++++------ src/client/html.ml | 2 +- src/dune | 12 +++++------ src/{permap.ml => geochan.ml} | 0 src/html.ml | 2 +- src/virtual/impl/dir.ml | 4 ++-- src/virtual/make_config_lib.ml | 2 +- test/config.scfg | 2 +- test/dune | 2 +- 11 files changed, 33 insertions(+), 61 deletions(-) rename permap.opam => geochan.opam (72%) rename src/{permap.ml => geochan.ml} (100%) diff --git a/README.md b/README.md index 9d6529a..7bb3da4 100644 --- a/README.md +++ b/README.md @@ -1,43 +1,14 @@ -# Permap +# Geochan -Permap is an open source geo-message-board software written in OCaml. - -Permap was initially made to be a gardening/permaculture forum. -Permap's aim is to help people find friends with similar interests around them -and build local communities. +Geochan is an open source imageboard software written in OCaml. +It's defining feature is to have geolocalized threads. You can make threads with geographical coordinate, -this way you can find people near you doing interesting things, -socialize with them and share local knowledge. - -## Permap's future - -- Make permap federate - -- More than coordinates - -Make threads on anything with a geographical position. -Instead of making threads with a simple (latitude * longitude) data, -we want to be able to make threads on any OpenStreetMap's item/ActivityPub object -that can resolve to a geographical position. +this way you can talk about a place or find people near you doing interesting things +and socialize with them. # License [AGPL-or-later] [AGPL-or-later]: ./LICENSE.md - -# TODO - -- post nb limit - -- make it a web-app instead - -- rework style, full screen map -- dream -> drame -- good moderation/admin system -- all of [issues](https://git.zapashcanon.fr/zapashcanon/permap/issues) -- imagemagick: WARNING: The convert command is deprecated in IMv7 - -- db error on login fail instead of clean login error msg -- login fail on login with email? diff --git a/dune-project b/dune-project index 0cebf64..7749f09 100644 --- a/dune-project +++ b/dune-project @@ -5,7 +5,7 @@ (implicit_transitive_deps false) -(name permap) +(name geochan) (license AGPL-3.0-or-later) @@ -18,18 +18,18 @@ "Léo Andrès ") (source - (uri git+https://git.zapashcanon.fr/zapashcanon/permap.git)) + (uri git+https://git.zapashcanon.fr/zapashcanon/geochan.git)) -(homepage https://git.zapashcanon.fr/zapashcanon/permap) +(homepage https://git.zapashcanon.fr/zapashcanon/geochan) -(bug_reports https://git.zapashcanon.fr/zapashcanon/permap/issues) +(bug_reports https://git.zapashcanon.fr/zapashcanon/geochan/issues) -(documentation https://doc.zapashcanon.fr/permap) +(documentation https://doc.zapashcanon.fr/geochan) (package - (name permap) - (synopsis "OCaml library/executable to TODO") - (description "permap is an OCaml library/executable to TODO.") + (name geochan) + (synopsis "A geo-imageboard written in OCaml") + (description "Geochan is an open source imageboard with threads pinned to a geolocation.") (tags (imageboard forum map leaflet single-page-application functional-reactive-programming)) (depends diff --git a/permap.opam b/geochan.opam similarity index 72% rename from permap.opam rename to geochan.opam index f495dab..36776a8 100644 --- a/permap.opam +++ b/geochan.opam @@ -1,7 +1,8 @@ # This file is generated by dune, edit dune-project instead opam-version: "2.0" -synopsis: "OCaml library/executable to TODO" -description: "permap is an OCaml library/executable to TODO." +synopsis: "A geo-imageboard written in OCaml" +description: + "Geochan is an open source imageboard with threads pinned to a geolocation." maintainer: ["swrup " "Léo Andrès "] authors: ["swrup " "Léo Andrès "] license: "AGPL-3.0-or-later" @@ -13,9 +14,9 @@ tags: [ "single-page-application" "functional-reactive-programming" ] -homepage: "https://git.zapashcanon.fr/zapashcanon/permap" -doc: "https://doc.zapashcanon.fr/permap" -bug-reports: "https://git.zapashcanon.fr/zapashcanon/permap/issues" +homepage: "https://git.zapashcanon.fr/zapashcanon/geochan" +doc: "https://doc.zapashcanon.fr/geochan" +bug-reports: "https://git.zapashcanon.fr/zapashcanon/geochan/issues" depends: [ "dune" {>= "3.0"} "bos" @@ -63,4 +64,4 @@ build: [ "@doc" {with-doc} ] ] -dev-repo: "git+https://git.zapashcanon.fr/zapashcanon/permap.git" +dev-repo: "git+https://git.zapashcanon.fr/zapashcanon/geochan.git" diff --git a/src/client/html.ml b/src/client/html.ml index 33b14cc..4860e2d 100644 --- a/src/client/html.ml +++ b/src/client/html.ml @@ -350,7 +350,7 @@ let def_page_title t_s = | New_thread -> "new thread" | kind -> Kind.to_string kind ) in - Fmt.str "%s | Permap" s |> String.capitalize_ascii |> Jstr.v + Fmt.str "%s | Geochan" s |> String.capitalize_ascii |> Jstr.v |> Document.set_title G.document in S.map (fun t -> t.page) t_s |> S.changes |> hold_endless set_title; diff --git a/src/dune b/src/dune index 4959d28..b243e6c 100644 --- a/src/dune +++ b/src/dune @@ -1,12 +1,12 @@ (executable - (public_name permap) - (modules permap) - (package permap) + (public_name geochan) + (modules geochan) + (package geochan) (libraries config_serv_impl ; implements config_serv config_impl ; implements config shared - permap + geochan ;; dream fmt @@ -19,9 +19,9 @@ (:standard -open Prelude))) (library - (name permap) + (name geochan) (wrapped false) - (modules :standard \ permap json_data syntax types err validate_str) + (modules :standard \ geochan json_data syntax types err validate_str) (libraries config_serv ; virtual config ; virtual diff --git a/src/permap.ml b/src/geochan.ml similarity index 100% rename from src/permap.ml rename to src/geochan.ml diff --git a/src/html.ml b/src/html.ml index 18eb759..119ad8a 100644 --- a/src/html.ml +++ b/src/html.ml @@ -15,7 +15,7 @@ let page_of_res res = (* TODO have a loading animation *) let app_start_page = - let title = "Permap" in + let title = "Geochan" in let body = El.body [] in let styles = let leaflet_style = "/assets/css/leaflet.css" in diff --git a/src/virtual/impl/dir.ml b/src/virtual/impl/dir.ml index 1a3a8a6..ffed3f1 100644 --- a/src/virtual/impl/dir.ml +++ b/src/virtual/impl/dir.ml @@ -1,9 +1,9 @@ module App_id = struct let qualifier = "org" - let organization = "Permap" + let organization = "Geochan" - let application = "permap" + let application = "geochan" end module Project_dirs = Directories.Project_dirs (App_id) diff --git a/src/virtual/make_config_lib.ml b/src/virtual/make_config_lib.ml index d81b3d3..e350078 100644 --- a/src/virtual/make_config_lib.ml +++ b/src/virtual/make_config_lib.ml @@ -138,7 +138,7 @@ let print_config_serv () = | Error (`Msg _) -> Fmt.error_msg "error when creating %a" Fpath.pp data_dir in - let db_path = Fpath.(data_dir / "permap.db") in + let db_path = Fpath.(data_dir / "geochan.db") in let s = Uri.of_string @@ Fmt.str "sqlite3://%a" Fpath.pp db_path in print_uri "db_uri" s; () diff --git a/test/config.scfg b/test/config.scfg index 3448757..4ef3629 100644 --- a/test/config.scfg +++ b/test/config.scfg @@ -1,7 +1,7 @@ default_logger true custom_logger true admin admin -source_code_url "https://git.zapashcanon.fr/swrup/permap" +source_code_url "https://git.zapashcanon.fr/swrup/geochan" hostname "localhost" port 3696 csrf_lifetime 3600 diff --git a/test/dune b/test/dune index 0ef8698..5013139 100644 --- a/test/dune +++ b/test/dune @@ -6,7 +6,7 @@ config_test ; implements config module shared comment - permap + geochan ;; alcotest fmt