emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/csv2ledger 0af0aa3de2 021/190: Rename `c2l-parse-date` and


From: ELPA Syncer
Subject: [nongnu] elpa/csv2ledger 0af0aa3de2 021/190: Rename `c2l-parse-date` and update doc string.
Date: Sun, 2 Jun 2024 15:59:42 -0400 (EDT)

branch: elpa/csv2ledger
commit 0af0aa3de218ce82bc74ea178578ab912e78f657
Author: Joost Kremers <joostkremers@fastmail.fm>
Commit: Joost Kremers <joostkremers@fastmail.fm>

    Rename `c2l-parse-date` and update doc string.
    
    New name: `c2l-convert-little-endian-to-iso8601-date`. It's a mouth full, 
but it
    better represents the function's purpose.
---
 csv2ledger.el | 15 ++++++++++++---
 1 file changed, 12 insertions(+), 3 deletions(-)

diff --git a/csv2ledger.el b/csv2ledger.el
index 61db9288ec..8368036bb0 100644
--- a/csv2ledger.el
+++ b/csv2ledger.el
@@ -139,9 +139,6 @@ returns a match wins."
   :type '(repeat symbol)
   :group 'csv2ledger)
 
-(defun c2l-parse-date (date)
-  "Convert DATE from \"17.10.2022\" to \"2022-10-17\"."
-  (string-join (nreverse (split-string date "\\.")) "-"))
 (defcustom c2l-auto-reconcile nil
   "If non-nil, mark every entry as reconciled."
   :type 'boolean
@@ -149,6 +146,18 @@ returns a match wins."
 
 
 (defun c2l-compose-entry (date title amount &optional description from to)
+(defun c2l-convert-little-endian-to-iso8601-date (date)
+  "Convert DATE from a little-endian format to an ISO 8601 format.
+DATE should be a string representing a date of the form
+DD.MM.YYYY.  Return value is a date string of the form YYYY-MM-DD.
+
+Note that the input date may have dots, dashes or forward slashes
+separating the date parts; also, additional whitespace is
+removed.  This function does not check if DATE has a valid date
+format, it just splits DATE on the separator, reverses the date
+parts and joins them again."
+  (string-join (nreverse (split-string date "[./-]" t "[[:space:]]")) "-"))
+
   "Create a ledger entry.
 DATE, TITLE, AMOUNT are used to create the entry.  DESCRIPTION,
 if non-nil, is added as a comment, preceded by \"Desc:\".  FROM



reply via email to

[Prev in Thread] Current Thread [Next in Thread]