From e4150032027455ccf920e2f407754e93ca052dec Mon Sep 17 00:00:00 2001
From: Lars-Dominik Braun <ldb@leibniz-psychology.org>
Date: Mon, 15 Mar 2021 09:43:49 +0100
Subject: [PATCH] gnu: Add r-striprtf.

* gnu/packages/cran.scm (r-striprtf): New variable.
---
 gnu/packages/cran.scm | 23 +++++++++++++++++++++++
 1 file changed, 23 insertions(+)

diff --git a/gnu/packages/cran.scm b/gnu/packages/cran.scm
index 7f6003ac01..0ffc90488a 100644
--- a/gnu/packages/cran.scm
+++ b/gnu/packages/cran.scm
@@ -27545,3 +27545,26 @@ (define-public r-textclean
 text but not always easily handled by analysis algorithms.  The
 @code{replace_emoticon()} function replaces emoticons with word equivalents.")
     (license license:gpl2)))
+
+(define-public r-striprtf
+  (package
+    (name "r-striprtf")
+    (version "0.5.2")
+    (source
+      (origin
+        (method url-fetch)
+        (uri (cran-uri "striprtf" version))
+        (sha256
+          (base32
+            "1ra6aalalig6drsj26z9s24lmb10zssagqrvgqqi4358zbm8gwcd"))))
+    (properties `((upstream-name . "striprtf")))
+    (build-system r-build-system)
+    (propagated-inputs
+      `(("r-magrittr" ,r-magrittr)
+        ("r-rcpp" ,r-rcpp)
+        ("r-stringr" ,r-stringr)))
+    (home-page "https://github.com/kota7/striprtf")
+    (synopsis "Extract Text from RTF File")
+    (description
+      "Extracts plain text from @dfn{Rich Text Format} (RTF) file.")
+    (license license:expat)))