refactor: nrow to seq_along

ambiorix-web · Apr 14, 2024 · 5b323d4 · 5b323d4
1 parent 13140c5
commit 5b323d4
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/response.R b/R/response.R
@@ -629,7 +629,7 @@ Response <- R6::R6Class(
 
       # hooks
       if(length(private$.preHooks) > 0) {
-        for(i in 1:length(private$.preHooks)) {
+        for(i in seq_along(private$.preHooks)) {
           pre_processed <- private$.preHooks[[i]](self, file_content, data, ext)
           if(!is_pre_hook(pre_processed)){
             cat(error(), "Not a valid return value from pre-hook (ignoring)\n")