[Bps-public-commit] r14122 - in sd/trunk: lib/App/SD/Replica/Hiveminder

[sartak at bestpractical.com]

Author: sartak
Date: Tue Jul 15 13:30:26 2008
New Revision: 14122

Modified:
   sd/trunk/   (props changed)
   sd/trunk/lib/App/SD/Replica/Hiveminder/PullEncoder.pm

Log:
 r64320 at onn:  sartak | 2008-07-15 13:30:21 -0400
 Add _origin_display to tickets from Hiveminder


Modified: sd/trunk/lib/App/SD/Replica/Hiveminder/PullEncoder.pm
==============================================================================
--- sd/trunk/lib/App/SD/Replica/Hiveminder/PullEncoder.pm	(original)
+++ sd/trunk/lib/App/SD/Replica/Hiveminder/PullEncoder.pm	Tue Jul 15 13:30:26 2008
@@ -59,6 +59,16 @@
                 $change->add_prop_change( { new => $previous_state->{$key}, old => undef, name => $key } );
             }
 
+            my $origin_display = $self->sync_source->hm_url
+                               . '/task/'
+                               . $previous_state->{record_locator};
+
+            $change->add_prop_change({
+                name => '_origin_display',
+                old  => undef,
+                new  => $origin_display,
+            });
+
         }
         $changeset->add_change( { change => $change } );
         foreach my $email ( @{ $txn->{email_entries} } ) {