change cat() output

main.r

@@ -17,7 +17,7 @@ cat("-> Dauert ca. 10-20 Sekunden.\n")
 cat("\n")
 cat("####\n")
 cat("At the end, the files are stored in the following working directory:\n")
-cat("P:/IMEBI/DigiHero_Teilnehmerdaten/Massenmails/tokenaufbereiter/\n")
+cat(getwd(),"\n")
 cat("####\n")
 suppressWarnings({
 suppressMessages({