[Bps-public-commit] r15964 - in sd/trunk: . t

spang at bestpractical.com spang at bestpractical.com
Sat Sep 13 17:18:47 EDT 2008


Author: spang
Date: Sat Sep 13 17:18:41 2008
New Revision: 15964

Modified:
   sd/trunk/   (props changed)
   sd/trunk/lib/App/SD/CLI/Command/Ticket/Comments.pm
   sd/trunk/t/sd-comments.t

Log:
 r49789 at loki:  spang | 2008-09-13 16:43:14 -0400
 add some newlines for readability to sd ticket comments


Modified: sd/trunk/lib/App/SD/CLI/Command/Ticket/Comments.pm
==============================================================================
--- sd/trunk/lib/App/SD/CLI/Command/Ticket/Comments.pm	(original)
+++ sd/trunk/lib/App/SD/CLI/Command/Ticket/Comments.pm	Sat Sep 13 17:18:41 2008
@@ -15,7 +15,7 @@
     if (@{$record->comments}) {
         for my $entry ($self->sort_by_creation_date($record->comments)) {
             print "id: ".$entry->luid." (".$entry->uuid.")\n";
-            print "created: ".$entry->prop('created')."\n";
+            print "created: ".$entry->prop('created')."\n\n";
             print $entry->prop('content')."\n\n";
         }
     } else {

Modified: sd/trunk/t/sd-comments.t
==============================================================================
--- sd/trunk/t/sd-comments.t	(original)
+++ sd/trunk/t/sd-comments.t	Sat Sep 13 17:18:41 2008
@@ -28,8 +28,8 @@
 run_output_matches(
     'sd',
     [ qw/ticket comments --uuid/, $yatta_uuid ],
-    [ qr/^id: \d+ \($comment_uuid\)/, qr/^created: /, "'This is a test'" ],
-    [], "Found the comment"
+    [ qr/^id: \d+ \($comment_uuid\)/, qr/^created: /, '', "'This is a test'",
+    '' ], [], "Found the comment"
 );
 
 run_output_matches(



More information about the Bps-public-commit mailing list