[freeside-commits] freeside/FS/FS Record.pm,1.226.2.9,1.226.2.10

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail.420.am:/tmp/cvs-serv6253

Modified Files:
      Tag: FREESIDE_2_3_BRANCH
	Record.pm 
Log Message:
better error message for identical replacements

Index: Record.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/Record.pm,v
retrieving revision 1.226.2.9
retrieving revision 1.226.2.10
diff -u -w -d -r1.226.2.9 -r1.226.2.10
--- Record.pm	18 Nov 2011 22:20:37 -0000	1.226.2.9
+++ Record.pm	2 Dec 2011 04:12:40 -0000	1.226.2.10
@@ -1309,7 +1309,9 @@
                    ? ($_, $new->getfield($_)) : () } $old->fields;
                    
   unless (keys(%diff) || $no_update_diff ) {
-    carp "[warning]$me $new -> replace $old: records identical"
+    carp "[warning]$me ". ref($new)."->replace ".
+           ( $primary_key ? "$primary_key ".$new->get($primary_key) : '' ).
+         ": records identical"
       unless $nowarn_identical;
     return '';
   }