Reformatted.

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)

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

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