diff --git a/DESCRIPTION b/DESCRIPTION index e6d846e..078a327 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,6 +1,6 @@ Package: raadfiles Title: File Database Management for 'raadtools' -Version: 0.1.4.9012 +Version: 0.1.4.9013 Authors@R: c(person("Michael D.","Sumner", role = c("aut", "cre"), email = "michael.sumner@aad.gov.au"), person("Ben", "Raymond", role = "ctb"), person("Kimberlee", "Baldry", role = c("ctb"), comment = c(ORCID = "0000-0003-3286-8624"))) diff --git a/NEWS.md b/NEWS.md index c55811b..513c103 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,5 +1,7 @@ # raadfiles dev +* Begin ccmp v03. + * Fix problematic old UTC flush (thanks Dale Maschette #33). * Avoid oldformat in Copernicus altimetry files. diff --git a/R/ccmpwind-files.R b/R/ccmpwind-files.R index 0476388..793cbf6 100644 --- a/R/ccmpwind-files.R +++ b/R/ccmpwind-files.R @@ -37,8 +37,8 @@ ccmp_6hourly_files <- function() { ## put all NRT last before distinct by date files <- files[nrow(files):1, ] -files <- dplyr::arrange(dplyr::distinct(files, .data$date, .keep_all = TRUE), date) %>% - dplyr::select(.data$date, .data$fullname, .data$root) +files <- dplyr::arrange(dplyr::distinct(files, .data$date, .keep_all = TRUE), desc(fullname), date) %>% + dplyr::select(.data$date, .data$fullname, .data$root) |> dplyr::arrange(date) files }