r18591 - gnucash/trunk/src/engine - Fix crash when copying a currently edited transaction in the register.

[Andreas Köhler]

Author: andi5
Date: 2010-01-31 02:12:59 -0500 (Sun, 31 Jan 2010)
New Revision: 18591
Trac: http://svn.gnucash.org/trac/changeset/18591

Modified:
   gnucash/trunk/src/engine/engine-interface.scm
Log:
Fix crash when copying a currently edited transaction in the register.

Modified: gnucash/trunk/src/engine/engine-interface.scm
===================================================================
--- gnucash/trunk/src/engine/engine-interface.scm	2010-01-30 22:59:37 UTC (rev 18590)
+++ gnucash/trunk/src/engine/engine-interface.scm	2010-01-31 07:12:59 UTC (rev 18591)
@@ -181,7 +181,7 @@
 (define (gnc:transaction-scm-get-other-split-scm trans-scm split-scm)
   (let ((split-scms (gnc:transaction-scm-get-split-scms trans-scm)))
   (cond ((not (= (length split-scms) 2)) #f)
-        ((= split-scm (car split-scms)) (cadr split-scms))
+        ((eq? split-scm (car split-scms)) (cadr split-scms))
         (else (car split-scms)))))
 
 ;; modifiers