 
 (ledger-define-regexp full-note
     (macroexpand
-     `(rx (and line-start (+ space)
+     `(rx (and line-start (+ blank)
 	       ?\; (regexp ,ledger-note-regexp))))
   "")
 

  (note end-note))

(ledger-define-regexp account
    (rx (group (and (not (any ?:)) (*? nonl))))
  "")

(ledger-define-regexp account-kind
    (rx (group (? (any ?\[ ?\)))))
  "")

(ledger-define-regexp full-account


(ledger-define-regexp cost
    (macroexpand
     `(rx (and (or "@" "@@") (+ blank)
	       (regexp ,ledger-commoditized-amount-regexp))))
  "")

(ledger-define-regexp balance-assertion
    (macroexpand
     `(rx (and ?= (+ blank)
	       (regexp ,ledger-commoditized-amount-regexp))))
  "")

