diff --git a/R/reproducibility_tables.R b/R/reproducibility_tables.R index cf668e4..3305516 100644 --- a/R/reproducibility_tables.R +++ b/R/reproducibility_tables.R @@ -193,8 +193,6 @@ get_session_info <- function(){ my_session_info2$data.version[is.na(my_session_info2$data.version)] <- '' else my_session_info2 <- my_session_info2[, -match('data.version', colnames(my_session_info2))] - # Replacing @ with # in source - my_session_info2$source <- gsub('\\(@', '(', my_session_info2$source) # Use short git hash # find '@' followed by 40 hex digits, # and substitute with the '@' and the first 7 hex digits in ()-captured group.