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

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

[nongnu] elpa/csv2ledger 93bd85b0e0 041/190: c2l-convert-region: Report


From: ELPA Syncer
Subject: [nongnu] elpa/csv2ledger 93bd85b0e0 041/190: c2l-convert-region: Report number of converted entries.
Date: Sun, 2 Jun 2024 15:59:44 -0400 (EDT)

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

    c2l-convert-region: Report number of converted entries.
---
 csv2ledger.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/csv2ledger.el b/csv2ledger.el
index eff8f98f66..2c088285ca 100644
--- a/csv2ledger.el
+++ b/csv2ledger.el
@@ -336,14 +336,17 @@ placed in the buffer \"*Csv2Ledger Results*\", which is 
erased
 beforehand if it already exists."
   (interactive "r")
   (let ((buffer (c2l-get-results-buffer))
+        (n 0))
     (save-mark-and-excursion
       (goto-char start)
       (beginning-of-line)
       (while (< (point) end)
         (let ((entry (c2l-csv-line-to-ledger (c2l-get-current-row))))
+          (setq n (1+ n))
           (with-current-buffer buffer
             (insert entry "\n")))
-        (forward-line 1)))))
+        (forward-line 1)))
+    (message "[Csv2Ledger] Converted %d entries." n)))
 
 (provide 'csv2ledger)
 



reply via email to

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