dont warn, stop and give a clear message

davidgohel · Apr 19, 2021 · 04bf439 · 04bf439
1 parent 8e8cb26
commit 04bf439
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 2 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,7 +1,7 @@
 Package: officer
 Type: Package
 Title: Manipulation of Microsoft Word and PowerPoint Documents
-Version: 0.3.19.001
+Version: 0.3.19.002
 Authors@R: c(
     person("David", "Gohel", role = c("aut", "cre"),
     email = "david.gohel@ardata.fr"),

diff --git a/R/ph_location.R b/R/ph_location.R
@@ -261,7 +261,8 @@ fortify_location.location_label <- function( x, doc, ...){
   }
 
   if( nrow(props) > 1) {
-    warning("more than a row have been selected")
+    stop("Placeholder ", shQuote(x$ph_label),
+         " in the slide layout is duplicated. It needs to be unique.")
   }
 
   props <- props[, c("offx", "offy", "cx", "cy", "ph_label", "ph", "type")]