Skip to content
Snippets Groups Projects
Commit 0ad65a91 authored by Gallenkamp, Fabian's avatar Gallenkamp, Fabian
Browse files

Undo commenting out.

parent eb421831
No related branches found
No related tags found
No related merge requests found
Show whitespace changes
Inline Side-by-side
Showing
with 3 additions and 3 deletions
citavi_export.R
+ 3
− 3
View file @ 0ad65a91
...@@ -51,11 +51,11 @@ pdf_to_text_file <- function(id, file_path) { ...@@ -51,11 +51,11 @@ pdf_to_text_file <- function(id, file_path) {
} }
# read pdf into string # read pdf into string
#readtext_result <- readtext::readtext(file_path, encoding = "UTF-8") readtext_result <- readtext::readtext(file_path, encoding = "UTF-8")
# save string into file with filepath result/<id>.txt # save string into file with filepath result/<id>.txt
#file_name <- paste0(dirname(filepath), "/result/", id, ".txt") file_name <- paste0(dirname(filepath), "/result/", id, ".txt")
#readr::write_file(readtext_result$text, file_name) readr::write_file(readtext_result$text, file_name)
return(TRUE) return(TRUE)
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment