[Bps-public-commit] r20134 - RT-BugTracker/html/Dist/Elements

[ruz at bestpractical.com]

Author: ruz
Date: Mon Nov 23 19:10:53 2009
New Revision: 20134

Modified:
   RT-BugTracker/html/Dist/Elements/EditNotes
   RT-BugTracker/html/Dist/Elements/EditNotifyAddresses

Log:
fix Edit* elements, no change - no message

Modified: RT-BugTracker/html/Dist/Elements/EditNotes
==============================================================================
--- RT-BugTracker/html/Dist/Elements/EditNotes	(original)
+++ RT-BugTracker/html/Dist/Elements/EditNotes	Mon Nov 23 19:10:53 2009
@@ -1,4 +1,4 @@
-<% loc('Distribution notes') %>:
+<% loc('Distribution notes') %> (<% loc('HTML subset allowed') %>):
 <textarea cols="120" rows="20" name="Queue-<% $Queue->id %>-Notes"><% $value %></textarea><br />
 <%ARGS>
 $Queue => undef
@@ -17,6 +17,8 @@
 my $value = $ARGS{'Queue-'. $Queue->id .'-Notes'};
 $value = $m->comp('/Elements/ScrubHTML', Content => $value );
 
+return () if ($Queue->DistributionNotes || '') eq ($value || '');
+
 my ($status, $msg) = $Queue->SetDistributionNotes( $value );
 return $msg;
 </%INIT>

Modified: RT-BugTracker/html/Dist/Elements/EditNotifyAddresses
==============================================================================
--- RT-BugTracker/html/Dist/Elements/EditNotifyAddresses	(original)
+++ RT-BugTracker/html/Dist/Elements/EditNotifyAddresses	Mon Nov 23 19:10:53 2009
@@ -18,6 +18,8 @@
 my @addrs = grep /\@/, map $_->address, grep defined,
     Mail::Address->parse( $value );
 
+return () if join(',', @{$Queue->NotifyAddresses}) eq join(',', @addrs);
+
 my ($status, $msg) = $Queue->SetNotifyAddresses(
     @addrs? \@addrs : undef
 );