File tree Expand file tree Collapse file tree 1 file changed +44
-0
lines changed
Expand file tree Collapse file tree 1 file changed +44
-0
lines changed Original file line number Diff line number Diff line change @@ -746,6 +746,50 @@ http://bugs.ledger-cli.org/show_bug.cgi?id=262"
746746 (should (equal '(-0.53 " USD" ) (ledger-split-commodity-string " -0.53 USD" ))))
747747
748748
749+ (ert-deftest ledger-reconcile/test-030 ()
750+ " `ledger-narrow-on-reconcile' basic functionality
751+
752+ Regression test for #383.
753+ https://github.com/ledger/ledger-mode/issues/383"
754+ :tags '(reconcile regress)
755+
756+ (let ((ledger-narrow-on-reconcile t ))
757+ (ledger-tests-with-temp-file
758+ demo-ledger
759+ (ledger-reconcile " Expenses:Books" '(0 " $" ))
760+ (switch-to-buffer ledger-reconcile-buffer-name)
761+ (with-current-buffer ledger-buf
762+ (should (equal (ledger-test-visible-buffer-string) "
763+ 2011/01/27 Book Store
764+ Expenses:Books $20.00
765+ Liabilities:MasterCard
766+
767+ 2011/04/27 Bookstore
768+ Expenses:Books $20.00
769+ Assets:Checking
770+ " )))
771+
772+ (setq ledger-post-account-alignment-column 2 )
773+ (setq ledger-post-amount-alignment-column 45 )
774+ (setq ledger-default-date-format " %Y/%m/%d" )
775+ ; ; buffer overlays should be refreshed after adding xact
776+ (ledger-reconcile-add " 2011/06/15" " Bookstore" )
777+ (with-current-buffer ledger-buf
778+ (should (equal (ledger-test-visible-buffer-string) "
779+ 2011/01/27 Book Store
780+ Expenses:Books $20.00
781+ Liabilities:MasterCard
782+
783+ 2011/04/27 Bookstore
784+ Expenses:Books $20.00
785+ Assets:Checking
786+
787+ 2011/06/15 Bookstore
788+ Expenses:Books $ 20.00
789+ Assets:Checking
790+ " ))))))
791+
792+
749793(provide 'reconcile-test )
750794
751795; ;; reconcile-test.el ends here
You can’t perform that action at this time.
0 commit comments