Hi folks,

I have happily used ledger for years.  Thanks, John for writing it.  I
just installed ledger on a new computer (ubuntu 10.04) and I am having
trouble with the emacs reconciling features that have worked well in
the past on other computers.  When I open a reconciling buffer, the
space bar does not toggle a transaction like it should.  When I change
ledger.el as follows, skipping the equality test between (car where)
and "<stdin>", things seem to work again.  I don't understand emacs
lisp enough to make more progress.  Any suggestions?

Thanks,

Scott



(defun ledger-reconcile-toggle ()
  (interactive)
  (let ((where (get-text-property (point) 'where))
        (account ledger-acct)
        (inhibit-read-only t)
        cleared)
;;    (when (equal (car where) "<stdin>")
    (when (equal 1 1)
      (with-current-buffer ledger-buf
          (goto-char (cdr where))
        (setq cleared (ledger-toggle-current 'pending)))
      (if cleared
          (add-text-properties (line-beginning-position)
                               (line-end-position)
                               (list 'face 'bold))
        (remove-text-properties (line-beginning-position)
                                (line-end-position)
                                (list 'face))))
    (forward-line)))

Reply via email to