ap-client

commit: 6375be7b133bec949430ac9db1383f1927bf05f6
parent 1f6251fe2a81cea9dc75e903ee4f34edd5b31f9e
Author: Haelwenn (lanodan) Monnier <contact@hacktivis.me>
Date:   Tue, 28 Mar 2023 00:26:19 +0200

lib/ActivityPub/PrettyPrint.pm: Use qw operator for key list

Diffstat:
M
lib/ActivityPub/PrettyPrint.pm
8
+-------

1 file changed, 1 insertion(+), 7 deletions(-)
diff --git a/lib/ActivityPub/PrettyPrint.pm b/lib/ActivityPub/PrettyPrint.pm
@@ -33,13 +33,7 @@ sub print_object {
 	  if $object->{"preferredUsername"};
 	printf ' ⚠' if ($object->{"sensitive"} eq JSON->true);
 	foreach (
-		"url",          "subtitleLanguage", "context",
-		"inbox",        "outbox",           "prev",
-		"next",         "published",        "updated",
-		"summary",      "content",          "bcc",
-		"bto",          "to",               "cc",
-		"object",       "attachment",       "tag",
-		"orderedItems", "mediaType"
+		qw{url subtitleLanguage context inbox outbox prev next published updated summary content bcc bto cc to object attachment tag orderedItems mediaType}
 	  )
 	{
 		print_object_key($indent, $object, $_);