mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-03-26 08:41:47 -07:00
* lisp/emacs-lisp/igc.el: Add docstrings in stats export functions
(igc--collect-stats-csv, igc--collect-stats-sqlite): Add docstrings. (Bug#79564)
This commit is contained in:
parent
cb036f78e4
commit
1b3a8a0099
1 changed files with 4 additions and 0 deletions
|
|
@ -407,6 +407,8 @@ Type \\`?' to see the mode's help."
|
|||
Used in calls to `format-time-string'.")
|
||||
|
||||
(defun igc--collect-stats-csv ()
|
||||
"Collect IGC statistics from `igc-info' into CSV file.
|
||||
This function is called from a timer; see `igc-start-collecting-stats'."
|
||||
(let ((buffer (get-file-buffer igc--collect-file)))
|
||||
(when buffer
|
||||
(with-current-buffer buffer
|
||||
|
|
@ -421,6 +423,8 @@ Used in calls to `format-time-string'.")
|
|||
(save-buffer))))
|
||||
|
||||
(defun igc--collect-stats-sqlite ()
|
||||
"Collect IGC statistics from `igc-info' into sqlite database.
|
||||
This function is called from a timer; see `igc-start-collecting-stats'."
|
||||
(let ((values (cl-loop with time = (format-time-string igc-stats-time-format)
|
||||
for (title n bytes) in (igc-info)
|
||||
collect (format "(\"%s\",\"%s\",\"%s\",\"%s\")"
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue