Displaying 1 result from an estimated 1 matches for "escape_paragraph".
Did you mean:
escape_paragraphs
2008 Sep 12
1
write.dcf does not quote as Debian would like it to (PR#12816)
...a
A simple quoting scheme is to add a space in front of such full stops:
--- src/library/base/R/dcf.R.orig 2008-09-12 20:42:37.000000000 +0100
+++ src/library/base/R/dcf.R 2008-09-12 20:54:16.000000000 +0100
@@ -133,7 +133,7 @@
## * We have to handle multiple fields per record.
escape_paragraphs <- function(s)
- gsub("\n[[:space:]]*\n", "\n .\n ", s)
+ gsub("\n \\.([^\n])","\n .\\1", gsub("\n[[:space:]]*\n", "\n .\n ",
s))
if(!is.data.frame(x))
x <- as.data.frame(x, stringsAsFactors = FALSE)...