[nongnu] elpa/csv2ledger cd955dd41b 172/190: Move c2l-compose-entry to the correct section.

[ELPA Syncer]

branch: elpa/csv2ledger
commit cd955dd41bd0ac1233017fc8643b666ef76a2196
Author: Joost Kremers <joostkremers@fastmail.com>
Commit: Joost Kremers <joostkremers@fastmail.com>

    Move c2l-compose-entry to the correct section.
    
    It should appear in the section for functions that can be used as values for
    user options, not in the section for helper functions.
---
 csv2ledger.el | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/csv2ledger.el b/csv2ledger.el
index 9c658d91b9..9711cdfaed 100644
--- a/csv2ledger.el
+++ b/csv2ledger.el
@@ -342,13 +342,6 @@ Return the modified transaction."
     (push (cons 'account account) transaction)
     transaction))
 
-;;; Helper functions
-
-(defun c2l--amount-p (str)
-  "Return non-nil if STR is likely to be an amount."
-  (if (string-match-p "[0-9]+[0-9.,]*\\(?:[.,][0-9]\\{2\\}\\)?" str)
-      str))
-
 (defun c2l-compose-entry (transaction)
   "Create a ledger entry.
 TRANSACTION is an alist containing (key . value) pairs that will
@@ -368,6 +361,13 @@ cleared, even if there is no value for `posted' in 
TRANSACTION."
             (make-string (- c2l-alignment-column 4 (length c2l-base-account) 2 
(length .amount)) ?\s)
             .amount "\n")))
 
+;;; Helper functions
+
+(defun c2l--amount-p (str)
+  "Return non-nil if STR is likely to be an amount."
+  (if (string-match-p "[0-9]+[0-9.,]*\\(?:[.,][0-9]\\{2\\}\\)?" str)
+      str))
+
 (defun c2l--read-accounts (file)
   "Read list of accounts from FILE."
   (when (stringp file)