rename geochan

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?

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 <contact@ndrs.fr>")
 
 (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

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 <swrup@protonmail.com>" "Léo Andrès <contact@ndrs.fr>"]
 authors: ["swrup <swrup@protonmail.com>" "Léo Andrès <contact@ndrs.fr>"]
 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"

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;

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

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

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)

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;
     ()

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

test/dune

@@ -6,7 +6,7 @@
   config_test ; implements config module
   shared
   comment
-  permap
+  geochan
   ;;
   alcotest
   fmt