From 97ad55fd96dab978c1c377a8394d489b089505d0 Mon Sep 17 00:00:00 2001
From: Gabriel Becker <gabembecker@gmail.com>
Date: Wed, 16 Dec 2020 18:49:16 -0800
Subject: [PATCH] Tiny tweak to RowsVerticalSection print method.

---
 R/00tabletrees.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/00tabletrees.R b/R/00tabletrees.R
index 92bbbbbd7..e9090e560 100644
--- a/R/00tabletrees.R
+++ b/R/00tabletrees.R
@@ -1594,7 +1594,7 @@ RowsVerticalSection = function(values,
 #' @method print RowsVerticalSection
 #' @export
 print.RowsVerticalSection <- function(x, ...) {
-  cat("in_rows object print method:\n----------------------------\n")
+  cat("RowsVerticalSection (in_rows) object print method:\n----------------------------\n")
   print(data.frame(
     row_name = attr(x, "row_names"),
     formatted_cell = vapply(x, format_rcell, character(1)),