Revert logical changes and put them in rich-iannone#504

olivroy · Nov 10, 2023 · a163e30 · a163e30
1 parent fda7958
commit a163e30
Show file tree

Hide file tree

Showing 4 changed files with 4 additions and 4 deletions.
diff --git a/R/count_unconnected_nodes.R b/R/count_unconnected_nodes.R
@@ -59,7 +59,7 @@ count_unconnected_nodes <- function(graph) {
       nodes_in_edf) %>%
     dplyr::pull("node_id")
 
-  if (length(nodes_in_edf) > 0) {
+  if (length(nodes_in_edf > 0)) {
     return(length(nodes_not_in_edf))
   } else {
     return(0L)

diff --git a/R/generate_dot.R b/R/generate_dot.R
@@ -538,7 +538,7 @@ generate_dot <- function(graph) {
           exists("to_column")) {
 
         if (length(from_column) == 1 &&
-            length(to_column) == 1) { # CHECK before it was length(from_column) == 1 && length(to_column) == 1
+            length(from_to_columns) == 1) {
 
           for (i in 1:nrow(edges_df)) {
 

diff --git a/R/trav_in_until.R b/R/trav_in_until.R
@@ -218,7 +218,7 @@ trav_in_until <- function(
     if (step == max_steps) break
   }
 
-  if (length(node_stack) > 0) {
+  if (length(node_stack > 0)) {
 
     if (add_to_selection) {
 

diff --git a/R/trav_out_until.R b/R/trav_out_until.R
@@ -212,7 +212,7 @@ trav_out_until <- function(
     if (step == max_steps) break
   }
 
-  if (length(node_stack) > 0) {
+  if (length(node_stack > 0)) {
 
     if (add_to_selection) {