From e5c6cc3d455695d6575b7a1ec0cfd43272e77afc Mon Sep 17 00:00:00 2001
From: wlandau <will.landau.oss@gmail.com>
Date: Thu, 22 Feb 2024 13:37:25 -0500
Subject: [PATCH] Print description

---
 R/class_pattern.R | 1 +
 R/class_stem.R    | 1 +
 2 files changed, 2 insertions(+)

diff --git a/R/class_pattern.R b/R/class_pattern.R
index 056c5d540..35e2e822a 100644
--- a/R/class_pattern.R
+++ b/R/class_pattern.R
@@ -163,6 +163,7 @@ print.tar_pattern <- function(x, ...) {
   cat(
     "<tar_pattern>",
     "\n  name:", target_get_name(x),
+    "\n  description:", x$settings$description,
     "\n  command:\n   ",
     produce_lines(string_sub_expression(x$command$string)),
     "\n  pattern:\n   ",
diff --git a/R/class_stem.R b/R/class_stem.R
index ac8bb0b1d..ffcf834bb 100644
--- a/R/class_stem.R
+++ b/R/class_stem.R
@@ -179,6 +179,7 @@ print.tar_stem <- function(x, ...) {
   cat(
     "<tar_stem>",
     "\n  name:", target_get_name(x),
+    "\n  description:", x$settings$description,
     "\n  command:\n   ",
     produce_lines(string_sub_expression(x$command$string)),
     "\n  format:", x$settings$format,