Update selector

mguideng · Jul 6, 2019 · 0a09ee0 · 0a09ee0
1 parent ad43f38
commit 0a09ee0
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/get_reviews.R b/R/get_reviews.R
@@ -64,7 +64,7 @@ get_reviews <- function(companyNum) {
                rev.title = html_text(html_nodes(pg, "span.authorInfo.tbl.hideHH")),
                rev.pros = collapse_html_text(html_nodes(pg, ".description .row:nth-child(1) .mainText:not([class*='toggleBodyOff'])")),
                rev.cons = collapse_html_text(html_nodes(pg, ".description .row:nth-child(2) .mainText:not([class*='toggleBodyOff'])")),
-               rev.helpf = html_text(html_nodes(pg, ".tight")),
+               rev.helpf = html_text(html_nodes(pg, ".css-otjqal")),
                source.url = paste(baseurl, companyNum, "_P", i, sort, sep = ""),
                source.link = html_attr(html_nodes(pg, ".reviewLink"), "href"),
                source.iden = html_attr(html_nodes(pg, ".empReview"), "id"),
@@ -78,7 +78,7 @@ get_reviews <- function(companyNum) {
                rev.title = html_text(html_nodes(pg, ".authorInfo")),
                rev.pros = collapse_html_text(html_nodes(pg, ".mt-md:nth-child(1) p:nth-child(2)")),
                rev.cons = collapse_html_text(html_nodes(pg, ".mt-md:nth-child(2) p:nth-child(2)")),
-               rev.helpf = html_text(html_nodes(pg, ".tight")),
+               rev.helpf = html_text(html_nodes(pg, ".css-otjqal")),
                source.url = paste(baseurl, companyNum, "_P", i, sort, sep = ""),
                source.link = html_attr(html_nodes(pg, ".reviewLink"), "href"),
                source.iden = html_attr(html_nodes(pg, ".empReview"), "id"),