--- transaction-svn.scm	2007-12-11 14:24:39.435457600 -0800
+++ transaction.scm	2007-12-11 15:37:31.492166400 -0800
@@ -462,8 +462,11 @@
                     " ")))
     
     (if (used-memo column-vector)
-        (addto! row-contents
-                (xaccSplitGetMemo split)))
+        ;; For bug 454834: Use transaction memo if split memo is unavailable.
+        (let ((memo (xaccSplitGetMemo split)))
+          (if (equal? memo "")
+              (addto! row-contents (xaccTransGetNotes parent))
+              (addto! row-contents memo))))
     
     (if (or (used-account-name column-vector) (used-account-code column-vector))
        (addto! row-contents (account-namestring account
