partial fix for #88

UrbanAnalyst · Aug 16, 2022 · d36ebaa · d36ebaa
1 parent 69e5406
commit d36ebaa
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 3 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: gtfsrouter
 Title: Routing with GTFS (General Transit Feed Specification) Data
-Version: 0.0.5.091
+Version: 0.0.5.092
 Authors@R: c(
     person("Mark", "Padgham", , "mark.padgham@email.com", role = c("aut", "cre")),
     person("Marcin", "Stepniak", , "marcinstepniak@ucm.es", role = "aut",

diff --git a/R/router.R b/R/router.R
@@ -433,7 +433,7 @@ map_all_trips <- function (gtfs, route, include_ids) {
     # no visible binding note:
     trip_id <- trip_headsign <- route_id <- route_short_name <- NULL
 
-    trip_ids <- gtfs$trip_ids [unique (route$trip_number)] [, trip_ids]
+    trip_ids <- unique (route$trip_id [order (route$time)])
     # trips with from_to_are_ids can end with trip_ids of NA from transfers
     trip_ids <- trip_ids [!is.na (trip_ids)]
     res <- do.call (rbind, lapply (trip_ids, function (i) {

diff --git a/codemeta.json b/codemeta.json
@@ -7,7 +7,7 @@
   "codeRepository": "https://github.com/ATFutures/gtfs-router",
   "issueTracker": "https://github.com/ATFutures/gtfs-router/issues",
   "license": "https://spdx.org/licenses/GPL-3.0",
-  "version": "0.0.5.091",
+  "version": "0.0.5.092",
   "programmingLanguage": {
     "@type": "ComputerLanguage",
     "name": "R",