commit 7aa4f1952a5fe86f330d8224f4c28a3603bf2179
author Marc Kupietz <kupietz@ids-mannheim.de> Fri Mar 05 10:51:24 2021 +0100
committer Marc Kupietz <kupietz@ids-mannheim.de> Fri Mar 05 14:14:10 2021 +0100
tree 3276f8f2024efebf4431e5a346b3b84311a8cb66
parent 3df159bb0a2d17a5905680697891d4b865d376af

Start using creationDate rather than pubDate

Change-Id: I131d8396ff592dbfeea890e515cb6aceb9038c98

R/misc.R

diff --git a/R/misc.R b/R/misc.R
index 108d942..0692619 100644
--- a/R/misc.R
+++ b/R/misc.R
@@ -78,9 +78,9 @@
 #' @export
 queryStringToLabel <- function(data, pubDateOnly = FALSE, excludePubDate = FALSE) {
   if (pubDateOnly) {
-    data <-substring(data, regexpr("pubDate", data)+7)
+    data <-substring(data, regexpr("(pub|creation)Date", data)+7)
   } else if(excludePubDate) {
-    data <-substring(data, 1, regexpr("pubDate", data))
+    data <-substring(data, 1, regexpr("(pub|creation)Date", data))
   }
   leftCommon = lcpCount(data)
   while (leftCommon > 0 && grepl("[[:alnum:]/=.*!]", substring(data[1], leftCommon, leftCommon))) {