From 789c093284909ca0f1c7254bef51aad8e3995880 Mon Sep 17 00:00:00 2001
From: interkosmos <pengel@hs-nb.de>
Date: Wed, 7 Aug 2024 11:08:13 +0200
Subject: [PATCH] Reformatted.

---
 README.md             | 2 +-
 app/dmweb.f90         | 7 ++++---
 src/dm_cgi_router.f90 | 4 ++--
 3 files changed, 7 insertions(+), 6 deletions(-)

diff --git a/README.md b/README.md
index 1688c4c..a69453f 100644
--- a/README.md
+++ b/README.md
@@ -74,7 +74,7 @@ POSIX semaphores.
 
 ## Requirements
 
-**DMPAC**K has the following requirements:
+**DMPACK** has the following requirements:
 
 * Linux or FreeBSD operating system
 * 64-bit platform (x86-64, AArch64)
diff --git a/app/dmweb.f90 b/app/dmweb.f90
index eff3049..455cfbd 100644
--- a/app/dmweb.f90
+++ b/app/dmweb.f90
@@ -34,6 +34,7 @@ program dmweb
     !! | `DM_DB_BEAT`         | Path to beat database.                       |
     !! | `DM_DB_LOG`          | Path to log database.                        |
     !! | `DM_DB_OBSERV`       | Path to observation database.                |
+    !! | `DM_TILE_URL`        | URL of map tiles.                            |
     !! | `DM_READ_ONLY`       | Open databases in read-only mode (optional). |
     !!
     !! The databases have to exist at start-up. Add the variables to the
@@ -702,8 +703,8 @@ subroutine route_logs(env)
     end subroutine route_logs
 
     subroutine route_map(env)
-        !! Shows map of sensor and target positions. The environment variable
-        !! `TILE_URL` must be set.
+        !! Shows map of node, sensor, and target positions. The environment
+        !! variable `DM_TILE_URL` must be set.
         !!
         !! ## Path
         !!
@@ -803,7 +804,7 @@ subroutine route_map(env)
         end do
 
         do i = 1, ns
-            if (i < nn .or. nt > 0) then
+            if (i < ns .or. nt > 0) then
                 call dm_cgi_out(dm_geojson_from(sensors(i)) // ',')
             else
                 call dm_cgi_out(dm_geojson_from(sensors(i)))
diff --git a/src/dm_cgi_router.f90 b/src/dm_cgi_router.f90
index ce45ae6..77b4161 100644
--- a/src/dm_cgi_router.f90
+++ b/src/dm_cgi_router.f90
@@ -128,11 +128,11 @@ integer function dm_cgi_router_set(router, routes) result(rc)
 
         integer :: i
 
-        rc = dm_cgi_router_create(router, max_routes=size(ROUTES))
+        rc = dm_cgi_router_create(router, max_routes=size(routes))
         if (dm_is_error(rc)) return
 
         do i = 1, size(routes)
-            rc = dm_cgi_router_add(router, ROUTES(i))
+            rc = dm_cgi_router_add(router, routes(i))
             if (dm_is_error(rc)) return
         end do
     end function dm_cgi_router_set