diff --git a/src/Ledger.c b/src/Ledger.c
deleted file mode 100644
index 3e7e22f4a4..0000000000
--- a/src/Ledger.c
+++ /dev/null
@@ -1,427 +0,0 @@
-#ifdef OBSOLETE
-/* 
- * FILE:
- * Ledger.c 
- *
- * FUNCTION:
- * copy transaction data from engine into ledger object
-XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
-
-HACK ALERT -- THIS CODE IS MORE OR LESS OBSOLESCENT, AND HAS BEEN
-REPLACED BY SPLITLEDGER.C    IT SHOULD BE DELETED BEFORE TOO LONG.
-
- *
- * HISTORY:
- * Copyright (c) 1998 Linas Vepstas
- */
-
-/********************************************************************\
- * This program is free software; you can redistribute it and/or    *
- * modify it under the terms of the GNU General Public License as   *
- * published by the Free Software Foundation; either version 2 of   *
- * the License, or (at your option) any later version.              *
- *                                                                  *
- * This program is distributed in the hope that it will be useful,  *
- * but WITHOUT ANY WARRANTY; without even the implied warranty of   *
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the    *
- * GNU General Public License for more details.                     *
- *                                                                  *
- * You should have received a copy of the GNU General Public License*
- * along with this program; if not, write to the Free Software      *
- * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.        *
-\********************************************************************/
-
-#include <stdio.h>
-
-#include "Ledger.h"
-#include "messages.h"
-#include "MultiLedger.h"
-#include "register.h"
-#include "table-allgui.h"
-#include "Transaction.h"
-
-#define BUFSIZE 1024
-
-/* ======================================================== */
-/* this callback gets called when the user clicks on the gui
- * in such a way as to leave the current transaction, and to 
- * go to a new one.  So, save the current transaction.
- */
-
-static void
-LedgerMoveCursor  (Table *table, void * client_data)
-{
-   BasicRegister *reg = (BasicRegister *) client_data;
-   xaccBRSaveRegEntry (reg);
-}
-
-/* ======================================================== */
-
-static void
-LedgerDestroy (BasicRegister *reg)
-{
-   /* be sure to destroy the "blank split" */
-   if (reg->user_hook) {
-      Split *split;
-
-      split = (Split *) (reg->user_hook);
-
-      /* split destroy will automatically remove it
-       * from its parent account */
-      xaccSplitDestroy (split);
-      reg->user_hook = NULL;
-   }
-}
-
-/* ======================================================== */
-
-Split * 
-xaccBRGetCurrentSplit (BasicRegister *reg)
-{
-   CellBlock *cursor;
-   Split *split;
-
-   /* get the handle to the current split and transaction */
-   cursor = reg->table->current_cursor;
-   split = (Split *) cursor->user_data;
-
-   return split;
-}
-
-/* ======================================================== */
-/* a split always has a partner */
-
-static char * 
-GetOtherAccName (Split *split)
-{
-   Account *acc = NULL;
-   Transaction *trans;
-   Split *s, *other_split;
-   int numsplits;
-
-   trans = xaccSplitGetParent (split);
-
-   numsplits = xaccTransCountSplits (trans);
-   if (2 < numsplits) return SPLIT_STR;
-
-   s = xaccTransGetSplit (trans, 0);
-   if (s == split) {
-      other_split = xaccTransGetSplit (trans, 1);
-   } else {
-      other_split = s;
-   }
-
-   acc = xaccSplitGetAccount (other_split);
-   if (acc) return xaccAccountGetName (acc);
-
-   return "";
-}
-
-/* ======================================================== */
-
-void 
-xaccBRSaveRegEntry (BasicRegister *reg)
-{
-   Split *split;
-   Transaction *trans;
-   Account * acc;
-   unsigned int changed;
-
-   /* use the changed flag to avoid heavy-weight updates
-    * of the split & transaction fields. This will help
-    * cut down on uneccessary register redraws.  */
-   changed = xaccBasicRegisterGetChangeFlag (reg);
-   if (!changed) return;
-   
-   /* get the handle to the current split and transaction */
-   split = xaccBRGetCurrentSplit (reg);
-   if (!split) return;
-   trans = xaccSplitGetParent (split);
-
-   /* copy the contents from the cursor to the split */
-
-   xaccTransBeginEdit (trans);
-
-   if (MOD_DATE & changed) 
-      xaccTransSetDate (trans, reg->dateCell->date.tm_mday,
-                               reg->dateCell->date.tm_mon+1,
-                               reg->dateCell->date.tm_year+1900);
-
-   if (MOD_NUM & changed) 
-      xaccTransSetNum (trans, reg->numCell->value);
-   
-   if (MOD_DESC & changed) 
-      xaccTransSetDescription (trans, reg->descCell->cell.value);
-
-   if (MOD_RECN & changed) 
-      xaccSplitSetReconcile (split, reg->recnCell->value[0]);
-
-   if (MOD_AMNT & changed) {
-      double new_amount;
-      new_amount = (reg->creditCell->amount) - (reg->debitCell->amount);
-      xaccSplitSetValue (split, new_amount);
-   }
-
-   if (MOD_SHRS & changed) {
-      xaccSplitSetShareAmount (split, reg->shrsCell->amount);
-   }
-
-   if (MOD_PRIC & changed) {
-      xaccSplitSetSharePrice (split, reg->priceCell->amount);
-   }
-
-   if (MOD_MEMO & changed) 
-      xaccSplitSetMemo (split, reg->memoCell->value);
-
-   if (MOD_ACTN & changed) 
-      xaccSplitSetAction (split, reg->actionCell->cell.value);
-
-   if (MOD_XFRM & changed) {
-      xaccMoveFarEndByName (split, reg->xfrmCell->cell.value);
-   }
-
-   if (MOD_XTO & changed) {
-      /* hack alert -- implement this */
-   }
-   xaccTransCommitEdit (trans);
-
-printf ("finished saving %s \n", xaccTransGetDescription(trans));
-
-   /* if the modified split is the "blank split", 
-    * then it is now an official part of the account.
-    * Set user_hook to null, so that we can be sure of 
-    * getting a new split.
-    */
-   if (split == ((Split *) (reg->user_hook))) {
-      reg->user_hook = NULL;
-   }
-
-   /* refresh the register windows *only* if something changed */
-   acc = xaccSplitGetAccount (split);
-   xaccAccountDisplayRefresh (acc);
-}
-
-/* ======================================================== */
-
-void
-xaccBRLoadRegEntry (BasicRegister *reg, Split *split)
-{
-   Transaction *trans;
-   char *accname;
-   char buff[2];
-   time_t secs;
-   double baln;
-
-   if (!split) return;
-   trans = xaccSplitGetParent (split);
-
-   secs = xaccTransGetDate (trans);
-   xaccSetDateCellValueSecs (reg->dateCell, secs);
-
-   xaccSetBasicCellValue (reg->numCell, xaccTransGetNum (trans));
-   xaccSetComboCellValue (reg->actionCell, xaccSplitGetAction (split));
-   xaccSetQuickFillCellValue (reg->descCell, xaccTransGetDescription (trans));
-   xaccSetBasicCellValue (reg->memoCell, xaccSplitGetMemo (split));
-
-   buff[0] = xaccSplitGetReconcile (split);
-   buff[1] = 0x0;
-   xaccSetBasicCellValue (reg->recnCell, buff);
-
-   /* the transfer account */
-   accname = GetOtherAccName (split);
-   xaccSetComboCellValue (reg->xfrmCell, accname);
-
-   xaccSetDebCredCellValue (reg->debitCell, 
-                            reg->creditCell, xaccSplitGetValue (split));
-
-   /* For income and expense acounts, we have to reverse
-    * the meaning of balance, since, in a dual entry
-    * system, income will show up as a credit to a
-    * bank account, and a debit to the income account.
-    * Thus, positive and negative are interchanged */
-   baln = xaccSplitGetBalance (split);
-   if ((INCOME_REGISTER == reg->type) ||
-       (EXPENSE_REGISTER == reg->type)) { 
-      baln = -baln;
-   }
-   xaccSetPriceCellValue (reg->balanceCell, baln);
-
-   xaccSetPriceCellValue (reg->priceCell, xaccSplitGetSharePrice (split));
-   xaccSetPriceCellValue  (reg->shrsCell,  xaccSplitGetShareBalance (split));
-   xaccSetPriceCellValue (reg->valueCell, xaccSplitGetValue (split));
-
-   reg->table->current_cursor->user_data = (void *) split;
-
-   /* copy cursor contents into the table */
-   xaccCommitCursor (reg->table);
-}
-
-/* ======================================================== */
-/* Some notes about the "blank split":
- * Q: What is the "blank split"?
- * A: A new, empty split appended to the bottom of the ledger
- *    window.  The blank split provides an area where the user
- *    can type in new split/transaction info.  
- *    The "blank split" is treated in a special way for a number
- *    of reasons:
- *    (1) it must always appear as the bottom-most split
- *        in the Ledger window,
- *    (2) it must be committed if the user edits it, and 
- *        a new blank split must be created.
- *    (3) it must be deleted when the ledger window is closed.
- * To implement the above, the register "user_hook" is used
- * to store the blank split with the register window structures.
- */
-
-void
-xaccBRLoadRegister (BasicRegister *reg, Split **slist, 
-                  Account *default_source_acc)
-{
-   int i;
-   Split *split;
-   Transaction *trans;
-   Table *table;
-   int save_cursor_phys_row;
-   int num_phys_rows;
-   int num_phys_cols;
-   int num_virt_rows;
-   int phys_row;
-   int vrow;
-
-   table = reg->table;
-
-   /* disable move callback -- we con't want the cascade of 
-    * callbacks while we are fiddling with loading the register */
-   table->move_cursor = NULL;
-
-   /* save the current cursor location; we want to restore 
-    * it after the reload.  */
-   save_cursor_phys_row = table->current_cursor_phys_row;
-   xaccMoveCursorGUI (table, -1, -1);
-
-   /* set table size to number of items in list */
-   i=0;
-   while (slist[i]) i++;
-
-   /* compute the corresponding number of physical & virtual rows. */
-   /* number of virtual rows is number of splits,
-    * plus one for the header  */
-   num_virt_rows = i+1;
-
-   /* plus one for the blank new entry split. */
-   if (!(reg->user_hook)) num_virt_rows ++;
-
-   /* num_phys_cols is easy ... just the total number os cells */
-   num_phys_cols = reg->header->numCols;
-
-   /* num_phys_rows is the number of rows in all the cursors */
-   num_phys_rows = reg->header->numRows;
-   num_phys_rows += (num_virt_rows-1) * (reg->cursor->numRows);
-
-   /* num_virt_cols is always one. */
-   xaccSetTableSize (table, num_phys_rows, num_phys_cols, num_virt_rows, 1);
-
-   /* make sure that the header is loaded */
-   xaccSetCursor (table, reg->header, 0, 0, 0, 0);
-
-printf ("load reg of %d entries --------------------------- \n",i);
-   /* populate the table */
-   i=0;
-   vrow = 0;
-   split = slist[0]; 
-   while (split) {
-
-      /* don't load the "blank split" inline; instead, we put
-       * it at the end. */
-      if (split != ((Split *) (reg->user_hook))) {
-         phys_row = reg->header->numRows;
-         phys_row += vrow * (reg->cursor->numRows);
-   
-         /* vrow+1 because header is virt row zero */
-         vrow ++;
-         xaccSetCursor (table, reg->cursor, phys_row, 0, vrow, 0);
-         xaccMoveCursor (table, phys_row, 0);
-         xaccBRLoadRegEntry (reg, split);
-      }
-
-      i++; 
-      split = slist[i];
-   }
-
-   /* add the "blank split" at the end */
-   if (reg->user_hook) {
-      split = (Split *) reg->user_hook;
-   } else {
-      trans = xaccMallocTransaction ();
-      xaccTransBeginEdit (trans);
-      xaccTransSetDateToday (trans);
-      xaccTransCommitEdit (trans);
-      split = xaccTransGetSplit (trans, 0);
-      xaccAccountInsertSplit (default_source_acc, split);
-      reg->user_hook =  (void *) split;
-      reg->destroy = LedgerDestroy;
-   }
-
-   phys_row = reg->header->numRows;
-   phys_row += vrow * (reg->cursor->numRows);
-   vrow ++;
-   xaccSetCursor (table, reg->cursor, phys_row, 0, vrow, 0);
-   xaccMoveCursor (table, phys_row, 0);
-   
-   xaccBRLoadRegEntry (reg, split);
-   
-   /* restore the cursor to its original location */
-   phys_row = reg->header->numRows;
-   phys_row += vrow * (reg->cursor->numRows);
-
-   if (phys_row <= save_cursor_phys_row) {
-       save_cursor_phys_row = phys_row - reg->cursor->numRows;
-   }
-   if (save_cursor_phys_row < (reg->header->numRows)) {
-      save_cursor_phys_row = reg->header->numRows;
-   }
-   xaccMoveCursorGUI (table, save_cursor_phys_row, 0);
-   xaccRefreshTableGUI (table);
-
-   /* enable callback for cursor user-driven moves */
-   table->move_cursor = LedgerMoveCursor;
-   table->client_data = (void *) reg;
-}
-
-#ifdef THIS_HAS_BEEN_MOVED_TO_SPLITREG_C 
-
-/* ======================================================== */
-/* walk account tree recursively, pulling out all the names */
-
-static void 
-LoadXferCell (ComboCell *cell,  AccountGroup *grp)
-{
-   Account * acc;
-   int n;
-
-   if (!grp) return;
-
-   /* build the xfer menu out of account names */
-   /* traverse sub-accounts recursively */
-   n = 0;
-   acc = xaccGroupGetAccount (grp, n);
-   while (acc) {
-      xaccAddComboCellMenuItem (cell, xaccAccountGetName (acc));
-      LoadXferCell (cell, xaccAccountGetChildren (acc));
-      n++;
-      acc = xaccGroupGetAccount (grp, n);
-   }
-}
-
-/* ======================================================== */
-
-void xaccLoadXferCell (ComboCell *cell,  AccountGroup *grp)
-{
-   xaccAddComboCellMenuItem (cell, "");
-   xaccAddComboCellMenuItem (cell, SPLIT_STR);
-   LoadXferCell (cell, grp);
-}
-
-#endif /* THIS_HAS_BEEN_MOVED_TO_SPLITREG_C  */
-/* =======================  end of file =================== */
-#endif