For ledger-post-align-postings to run on xacts added with ledger-add

lisp/ledger-post.el

@@ -104,7 +104,6 @@ at beginning of account"
   "Align all accounts and amounts within region, if there is no
 region align the posting on the current line."
   (interactive)
-  (assert (eq major-mode 'ledger-mode))
 
   (save-excursion
     (if (or (not (mark))

lisp/ledger-xact.el

@@ -200,7 +200,8 @@ correct chronological place in the buffer."
              (goto-char (point-min))
              (if (looking-at "Error: ")
                  (error (concat "Error in ledger-add-transaction: " (buffer-string)))
-               (buffer-string)))
+							 (ledger-post-align-postings (point-min) (point-max))
+							 (buffer-string)))
            "\n"))
       (progn
         (insert (car args) " \n\n")